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PROGRAMMER'S ORIENTATION 


Thi 
program anual Serves as a reference guide for 
reading 8 the Toshiba T100 Personal Computer. Before 
Owner's Mai manual, you should have read the T100 
computer ‘nual which shows you how to set up your 
programm Sperate it, trouble-shoot and learn some 
paths ¢ Ng fundamentals. Your T1100 offers you two 

‘© software development with two versions of the 

e: 


BASIC languag, 


© Toshiba's Version, T-BASIC, resides in ROM. An 
extended version, T-DISK BASIC, is loaded from your 
Toshiba T-DISK BASIC system diskette when you turn 
on your disk drive and insert this diskette prior to 
Powering up your CPU. Besides providing a powerful 
instruction set, Toshiba's T-BASIC also provides a 
Graphics Macro Language (TM) (GML) and a Music 
Macro Language (TM) (MML) that make programming 
your 1100 for musie and graphics easier and more 
powerful. 


If you have a disk drive on your system, you can 
Program in Digital Research's CBASIC (R) language 
provided on the CP/M (R) system disk included with 
your disk drives. Using CP/M on your T100 offers 
the expandability and flexibility of the wide variety 
of software that runs under this operating system 


This manual is divided into two major Sections and 
several Appendices. 


Section 1 provides a quick reference summary of the 


most frequently-used CP/M commands to allow you to 
begin working with this onerating system. If you wish 
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of CP/M!s extensive capabilities, 


antage A 
to take full advantag chasing one of the many 


you can learn more by pur 
available books on CP/M. 


is Toshiba's BASIC Language Reference 
aseen Ti section contains all the commands and their 
descriptions for Toshiba's two versions of BASIC: 
T-BASIC and T-DISK BASIC. For convenience, a brief 
description of each command preceeds the in-depth 


instructions for its use. 
Appendices with helpful but less frequently used 


information follow Section 2. A comprehensive index 
guides you to the page numbers where terms and concepts 


are discussed. 
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SECTION 1 
USING CP/M 


OVERVIEW 


crn Purpose of this section is to explain what the 
inte a is and how it is used. Your computer is an 
anal elated system of devices and programs, and not just 
atte, unit. You need to direct these interrelated 
CP/M. ie mponents to perform the functions you want. 
c M is an operating system which does this for you 
P/M directs the activities of your computer's | 
components and manages files which contain computer | 
instructions or data. The CP/M disk contains the 
Operating system. You can think of CP/M as a traffic 
controller directing your computer's activities. 


CP/M stands for CONTROL PROGRAM/MONITOR . 
It is a widely used disk operating system for 
microcomputers produced by a company named Digital 
Research, Although CP/M is a complex computer — 
program, you can learn to use it without any prior 
computer experience. 


The T100 version of CP/M is designed for use with | 
your printer set to 10 characters per inch (10-piteh). The 
CP/M system disk used with the 7100 Floppy Disk Drive 
Unit censists of the following parts: i 


o The operating system and utilities. 


© A CBASIC compiler (CBAS2.COM) and runtime 
monitor program. 


papsili-l 


The T100 CP/M system disk contains the following files: 


ASM.COM CBAS2.COM 
COPY.COM CRUN2.COM 
DUMP.COM EO CON. aor 
PIP.COM MONITOR. 
TV.COM TV1.COM 
CONFIG.COM DUMP.ASM “a 
XSUB.COM COLOR.CO. 
DDT.COM FORMAT.COM 
STAT.COM XFER.COM 
SUBMIT.COM 


The CP/M Command Reference Summary gives a 
summary of all the CP/M commands described in this 
section. The following pages explain how to boot CP/M 
on your T100, how to back up your CP/M diskette and 
how to use the various CP/M commands to accomplish 
such activities as copying disks and renaming files, 
Initially, scan through this section, reading the short 
description of each function. This will familiarize you 
with the CP/M funetions that are required or are 
available as a convenience. Then, as needed, you can 
follow the step-by-step procedure for an activity. 


If you receive error messages on your screen while 
working with CP/M, you can look up their meaning on the 
page near the end of this section. 


Appendix H, CP/M COLOR PROGRAMMING, describes 
how to generate color on your Fine Color Display. 
NOTE: In this section, references to disk Drive A, or #1, 
both indicate the left floppy disk drive; references to 
disk Drive B, or #2, both indicate the right floppy disk 
drive. The return key indicates the carriage return (CR) 
key. (CR and EXEC are the same.) 
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Format 


to 


INSERT 
TYPE 


RECEIVE 
PRESS 


RECEIVE 


WAIT 


RECEIVE 


PRESS 
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CP/M COMMANDS 


FORMATTING THE CP/M DISK 
CP/M UTILITY: FORMAT.COM 


ting is necessary for all blank or i 
ee new diskettes 


The disk to be formatted in Drive 2, 


FORMAT after the system 
Reroee ys Prompt A>, press 


A screen display of the FORMAT UTILITY, 


RETURN to begin format or BR. 
ae EAK to stop 


If you pressed carriage return in the last 
Step, the system responds with the message: 


Formatting Disk Now + Please Wait 


Track #XX 


piesa: Format Now Complete ! .... Remove 


RETURN to continue the format procedure ot 
r 
BREAK to end the format procedure, 


If the formatting procedure is 
> i unsuccessful, 
you will receive the message: 


Bad Disk Please Try Another! 


If you receive this messa; 
t ge, retry the same 
diskette or try another diskette. u 


COPYING A DISKETTE 
CP/M UTILITY: COPY.COM 


apability on your T100 of copying an 
ditireralsxette 3 Cotta diskette. _ This is also known as 
backing up a disk and is worthwhile for important data 
disks and CP/M system disks. Be very careful, | though, to 
use the correct disks, NOTE: Any information on the 
receiving diskette is replaced (overwritten) by the 
information on the other diskette. Before using COPY, be 
sure to FORMAT your receiving disk. 


To copy disks on the T100, type COPY. This initiates a 
series of three screens that step you through the copy 
process. Screen #1 displays: 
TOSHIBA CP/M X.X COPY UTILITY 
Step 1 > Insert SOURCE disk in Drive #1 
Step 2 > Insert FORMATTED disk in Drive #2 
Press RETURN to begin copy or BREAK to end 


After pressing RETURN, Screen #2 displays the following 
information: 


TOSHIBA CP/M X.X COPY UTILITY 
Copying Disk Now ........ Please Wait 
Track # XX 
During the copy operation, the XX indicating the track 
number will cycle from 00 through 34. The screen will 


contain the information shown on Sereen #3, unless the 
following error message appears on Screen #2: 
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TOSHIBA CP/M X.X COPY UTILITY 
Bad Disk Please Try Another ! 
Pre: 
SS RETURN to continue copy or BREAK to end 

Sereen #3 wif 

j Will contain the following inf ion i 
co in the following information if th 

PY iS completed successfully: i 4 


TOSHIBA CP/M X.X COPY UTILITY 


Copy Now Complete ! .... Remove Disks 


Press RETURN to continue copy or BREAK to end 
If there is 


this point & problem completing the copy successfully, at 


line 2 of Sereen #3 will display: 
COPY NOT COMPLETE....PLEASE TRY AGAIN 


NAMING CP/M FILES 


Every file on a diskette needs a name. You will use 
this name, via commands to CP/M, to do various 
things with the file. This includes looking at the 
file's contents, copying it, ete. You will learn how 
to use the commands on the following pages. First, 
you must know how to formulate names properly. 


All CP/M file names are of the form FILENAME,.TYP 


The primary name (FILENAME) is always used. It 
can consist of any continuous string of alphabetical 
or numeric characters of eight characters or less, 


The secondary name (TYP) is the file type and can 


consist of any continuous string of alphabetics or 
numeries, three characters or less in length. 
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Examples of common secondary file names are: 


CBASIC program file. 
intermediate language file. 


file. Stands for 


Stands for 


CP/M program 
command file. 


MBASIC source program file. 


-BAK Back-up file created by a text editor 
such as ED, WordStar (TM), ete. 


You cannot have a space in a file name. 


Also, you cannot use any of the following characters 
in a file name: 
had ene 


To be safe, always use letters or numbers only. 


An example of a file name is: 
RADIO.STA 


RECONFIGURE THE CP/M DISK 
CP/M UTILITY: _CONFIG.COM 


This utility reconfigures the CP/M system disk 
changing the Video Display (CRT) and Printer Control 
Codes, Keyboard Matrix, Communication Function 
Parameters and Screen Size. It is also used to copy 
the system portion (SYSGEN) of one CP/M disk to a 


new disk. 


TYPE Following the system prompt A>, type CONFIG 
followed by a carriage return. 
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RECEIy; 
EA 
me ane ae tracks of the CP/M disk are 
: ; 
with Hose Aaa PROGRAM Main Menu, 


(1 i 

a Modify CRT Control Codes 

6) Modify Printer Control 

(y Soe Keyboard Matrix 
'y Communications Param 

a Select Default Screen Size Bs | 

( Sysgen System 

7) Exit 

TYPE 
A number fr 

i om 1 to 7, i 
function you wish to sume ee Mee 


RECEIVE 4 
Screen display of the codes or 
, ara 
we pation you wish to use, (For aeanale 
ie eee eBw Control Codes), you 
een display of all 15 
control codes. See Appendi isting of 
all the screens matenin ‘the. ogee ee 
ig the opt 
CONFIGURE PROGRAM Main Menakehe tae 


To change control codes or parameters: 


TYPE Nand carri i 
ri 
asking: lage return in response to the prompt 


"All Correct?" 


HOHE Eee 


RECEIVE Prompt asking i 
you to input the 
code or parameter you Eh to cunaea stone 


TYPE The number of t i 
wish to change. he item (code or parameter) you 


RECEIVE The cursor is positi, 
item you wish to Sek hs or ena 


TYPE The change to the code or parameter 
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GES, REPEAT FROM 
NTINUE MAKING CHAN' i 
ASTERISKS ON THE PREVIOUS PAGE 


TO TERMINATE THE CHANGES: 
TYPE Y and carriage return. 
RECEIVE Prompt "All Correct" 
TYPE Carriage return. 


RECEIVE Screen display of CONFIGURE PROGRAM Initial 
Menu. 


WHEN ALL CHANGES TO ALL ITEMS ARE COMPLETE: 


TYPE 6 and carriage return on Initial Menu. 
INSERT A formatted disk in Drive B (Drive 2). 


i i P/M disk 
ESS Carriage return to reconfigure new iG 
oe or BREAK to end writing new disk. 


RECEIVE Screen display showing: 
"Writing Track X" 
Please wait .... Processing occurring 


RECEIVE Screen display advising proper diskette labeling 
and prompt: 


"Press any key to return to Main Menu..." 


NOTE At this point Drive A contains the original 
CP/M disk with the original codes and Drive B 
contains the new modified codes. If you want 
to run the newly configured system, you must 


take out the CP/M disk in Drive A, replace it 


with the disk in Drive B and reboot. 
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LOOKING AT FILE NAMES 
CP/M COMMAND: __ DIR 


oy or more files may be stored on a diskette. 
5 M command, called DIR for Directory, enables you 
look at the names of these files in several ways, 
€xplained below. You can only type the command 
at the CP/M operating level. This is indicated by 
Prompt symbol A> on the screen. 


EXAMININ 
INSERT 


TYPE 


G THE CONTENTS OF A DISKETTE 
The diskette you wish to examine in Drive A, 


DIR (upper case letters not necessary), 


RECEIVE A listing of all the files stored on the diskette, 


FINDING A SPECIFIC FILE 
TYPE DIR filename.typ where you supply the actual 


file name (primary and secondary). For example: 
DIR DAVID.DOC 


RECEIVE The file name on the screen. Or, if the file 
does not exist, you will see the message: 


NO FILE 


FINDING A RANGE OF FILES 
TYPE DIR filename.* 
For example: 


DIR ORDER.* 


RECEIVE All of the files with the primary file name you 
specified in the command. The asterisk (*) acts 
as a wild card or sort parameter. (The same 


ean be done for a secondary name. For 
example: DIR *.COM.) 
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DE 
TETING A SPECIFIC FILE 
OR,TYPE DIR xx*.* 7 
For example: ge f YPE ERA filename.typ 
DIR AP*. ‘or example: 


i files that have 
receive all of the fi ‘A 
ee Seer tte name beginning with AP. ERA DAVID.DOC 


DELE 
NOTE To perform any of the sbove DIR. functions on @ TING A GROUP OF FILES ON A DISKETTE 
diskette in Drive B, use B: to preface the TYPE ERA filename.* 
filename. For example: For example: , 
; DIR B:ORDER.* 
a BDAY IDO ERA ORDER.* | 
:AP*, | 
(You can do the same for Secondary file 
DELETING FILES } Names, For example, ERA *.COM.) 
CP/M COMMAND: BRA | 


OR, TYPE ERA xx*.* 

You will probably want to remove outdated files from Where xx stands for the first two letters of the | 
your diskettes. The CP/M command ERA, for erase, file name. For example, ERA AP*.* 

was designed for this purpose. You can erase files A | 
in different ways, as described below. You should Gq NOTES It is helpful to do a DIR command after erasing — 


then do a DIR command to verify that the file was a file to verify that it was properly erased. If 
erased. Remember, all CP/M commands can only be So, you should receive the message, "NO FILE", | 
entered following a prompt symbol. on the screen, 

To perform any of the above ERA functions on 


a diskette in Drive B, preface the file name 
DELETING ALL FILES ON A DISKETTE i with B:. For the above examples: 


INSERT The diskette from which you wish to delete ERA B:*.* ERA B:DAVID.DOC 


ERA B:ORDER.* 
files (in Drive A). ERA B:AP*.* 


TYPE ERA*.* (upper case letters not necessary). 


RENAMING A FILE 
CP/M COMMAND: REN 
RECEIVE You will receive the message: 


ALL (Y/N)? You may want to change names of files, to link 
a together related files via similar names, or simply to 
PRESS The letter Y. (It takes approximately p improve a name. The CP/M command REN, for 

seconds to erase a disk.) rename, is used. Be sure that you type the command 
only in response to the prompt symbol. 
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INSERT The diskette containing the file you want to 


TYPE 


rename in Drive A. 


At the prompt symbol A>, type: 


REN newfile.typ=oldfile. typ 


For example: 
REN HAM.DOC=EGGS.TXT 


Do a directory (DIR) to verify that the old file 
name (in the case above, EGGS.TXT) does not 
appear. The new file name (HAM.DOC, shown 


above) should appear. 


To do the same for a file on a diskette in 
Drive B, type REN B:HAM.DOC=EGGS.TXT, 
Notice that the B is only typed once. 


If an attempt is made to rename a file to a file 
name that already exists on the same diskette, 
the message FILE EXISTS will appear. Delete 
the existing file or choose a different file name. 


Do not use the asterisk (*) described in the DIR 
and ERA sections to rename more than one file 
at a time. Only one file can be renamed at a 
time. 


EXAMINING A FILE'S CONTENTS 
CP/M COMMAND: TYPE 


While the DIR command is available for reviewing file 
names, the TYPE command allows you to look at the 
contents of files, 


INSERT The diskette with the file you desire to see (in 


Drive A). 
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TYPE 
At the Prompt symbol, type the following: 
TYPE filename.typ 


For example: 
TYPE LETTER.TXT 


RE 

CEIVE You will receive on the screen a listing of the 

Specified file's contents. 

N 
OTES It the listing is longer than the screen's 
Capacity, the information will begin to scroll up 
on the screen. To stop Serolling, press the 
Space bar. This process, however, takes you 
Out of the TYPE mode so that you cannot 
Tesume the listing. 


If you wish to see the contents printed out on 
your printer, simultaneously push the CTRL and 
P keys. All subsequent sereen output will also 
80 to the printer. 


Do not use the asterisk described in the DIR 
and ERA sections to type out the contents of 
more than one file at a time. 


To use the TYPE command for a file on a 
diskette in Drive B, type the following, for 
example: 

B:TYPE LETTER.TXT 


COPYING A FILE 
CP/M UTILITY: PIP 


You learned earlier in this booklet to use a copy 
utility for copying entire disks. The CP/M utility 
PIP allows you to copy a single file from one disk to 
another. 


INSERT The CP/M disk in Drive A, 
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INSERT f 
The diskette you wish to copy from in Drive A 
‘Source disk), 


REPEAT From the 
FOR Ay: 


PROCEDURE HER FILE COPY, REPEAT THE ENTIRE 
© ret 


INSERT The diskette you wish to copy to in Drive B 


(destination disk). "REMOVE" step on the previous page. 


PRESS The BREAK key. 


TYPE PIP when the CP/M prompt appears on the 
screen. 


urn to” i 
N to the system, press carriage return. 


] DETERMINING DISK STATUS 
CP/M COMMAND: STAT 


PRESS The RETURN key. 


REMOVE The CP/M diskette from Drive A when the 
asterisk (*) appears on the screen. 


ye Command STAT provides several facts about 

a le contents of a diskette: 

* The actual size of files on a diskette. 

» The amount of space remaining on a diskette, 

3. Whether @ file or diskette has read and write 
or just read only status, 


The following procedure provides information on all 
three, 


INSERT The diskette you wish to copy from in Drive A. 


SEO IE IO Oe 


TYPE The following: 
B:=A:filename.typlv] 


For example: 
B:=A:DAVID.DOCLv] 


INSERT A CP/M diskette in Drive A. 


The [v] causes CP/M to verify that the file was 
copied correctly. 


FABER ek 


PRESS The RETURN key. INSERT The diskette you wish to STAT in Drive B. 


RECEIVE The asterisk (*). This symbol indicates that the 


PRESS The BREAK key. (If i 
copying process is completed. ey. (If you do not press this key, 


you may receive erroneous information.) 


IF YOU WISH TO COPY ANOTHER FILE USING THE 
SAME SOURCE AND DESTINATION DISKS: 


| TYPE When the CP/M prompt appears on the sereen, 
type: 
STAT B:*.* 


REPEAT From the "REMOVE" step above. 


RECEIVE The number of records, total number of bytes in 
the file, the number of logical extents occupied, 
the read/write status of the file and the file 

name. This information scrolls up on the 
sereen, showing one line of the above figures 
per file name. To stop the scrolling, press the 
CTRL key and the S key at the same time. To 
resume scrolling, press 


IF YOU WISH TO COPY ANOTHER FILE FROM A 
DIFFERENT SOURCE DISK, BUT THE SAME DESTINATION 
DISK: 


REMOVE The original source disk from Drive A- 
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any key. FILE EXISTS 


DI 
IF YOU WANT TO EXAMINE ANOTHER DISKETTE . The file name is already in use. 


REMOVE The disk from Drive B. N 1. Select a new file name. 
. 2. Or, rename the file that already 


i the previous re. 
REPEAT From the asterisks on (23 bag: exists. 


ERROR MESSAGES NO FILE or NOT FOUND 


CP/M could not find the file. 


If you make inadvertent errors, such as typing the 
wrong key, you will receive error messages. The 
following messages are in alphabetical order. Also 
included are expanded descriptions of the errors, as 
well as steps to correct them. 


1. Check the directory for file names 
on both the A and B Drives. The 
file may not exist. 

2. Make sure you have the most current 
data disk. 

3. Retype the file name and check for 
current file name spelling. 


BDOS ERROR ON 
PIP? 


CP/M could not find the disk in Drive A 
or B. The PIP program is not stored on the 
currently logged disk. 

1. Make sure the diskette is formatted. 

2. Make sure the power to the disk 1. Cheek the directory of the CP/M 
drive is on, diskette for PIP.COM. 

8. Make sure the disk drive door is : | 2. ‘Insert the disk that has the PIP.COM 
completely shut. program. 

4. Check the diskette. It could be 
badly mangled, deteriorated or 
destroyed. 


BDOS ERROR ON: SELECT 
The drive selected does not exist. 
1. Press the RETURN or ENTER key to 


Tecover. 
2, Restart the computer, if necessary. 
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CP/M REFERENCE SUMMARY ° 


COPY 


CONFIG 


ire diskette to another diskette. 
Sales place the source diskette in 
Drive A and a formatted disk in Drive B — then 


press RETURN. 

i i cP/M 
Reconfigures CP/M and writes a new 
system Sisk. Also may be used to SYSGEN any 


CP/M disk. 
race CONFIG and RETURN. Follow the menu 


prompts to reconfigure CP/M. 
(Directory) displays a file name list. 


Type DIR and receive a display of all file 
names on the diskette. 


Erase a file. 


Type ERA *.* Type Y in response to prompt to 
erase all files on a diskette. 


Type ERA filename.typ to delete a specific file. 


To delete a group of files, type ERA filename.* 
or ERAxx*.* (where xx are the first two letters 
of the file name), 


Transfer files between diskettes. 


Insert destination disk in Drive B. Press 
BREAK key. After CP/M prompt, type PIP, 
Press (CR). When * appears on screen, remove 
CP/M disk from Drive A, replace with source 
diskette. 


Then type: 


:=A:filename.typ[v] and press (CR). Asterisk 
on screen means copy is complete. 
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Changes a file name. 


Place the diskette containing the file you want 
to rename in Drive A. Type REN 
Newfile. typ=oldfile.typ. 


NOTE: Do not use asterisk (*) described in DIR 


9 ERA to rename more than one file at a 
ime. 


Displays unused area or file information on a 
disk, device allocation or device change. 


Insert disk you want to STAT in Drive B, Press 


the BREAK key. Aft 
STAT B+, Se Ren was boumaee 


Displays file contents. 


Place the diskette containing the file you want 
to examine in Drive A, type filename.typ . 


To use TYPE for a file on a diskette in Dri 
B, type B:TYPE filename.typ . page 


SECTION 2 
c TOSHIBA'S T-BASIC LANGUAGE REFERENCE SUMMARY 
OVERVIEW 


Toshiba's proprietory language is T-BASIC and its 
extension, T-DISK BASIC. Section 2 consists of the 
following major subsections describing the language: 

© General Programming Information 
c © Commands And Statements ; 
© Alphabetical listing each with: 
© Purpose 
o Format 
© Version (Whether it can be used 
with T-DISK BASIC or T-BASIC) 
© Other pertinent notes 
o An example 
© Intrinsic Functions 
o Alphabetical Listing with the same 
categories as Commands And Statements 


GENERAL PROGRAMMING INFORMATION 


The 1T100 Owner's Manual gives an 
Programming with T-BASIC, 
defined and the novice in particular has a chance to 
experiment with some simple Programs. This section, 
General Programming Information, i much : 
information about the re essary for building 
@ useful program on t n if you are an 
experienced Programmer, you would do well to sean it. 
All of the materi les to both T-BASIC and T-DISK 
noted. Once you learn about the 
formats and conventions in this 


80 on to reviewing thi il 
commands, statements and functions, Ehalaee ovallable 


introduction to 
Program components are 
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Initialization 
— 


The system automatically boots T-DISK BASIC from the 
disk drive (Drive 1) if it is present and in a ready state. 
Otherwise, it defaults to T-BASIC resident in ROM. 


Modes Of Operation 


When initialization takes place, the prompt "Ok" is 
displayed. "Ok" means that the 7100 is ready to accept 
commands, At this point, you may use either of two 
modes; the direct (immediate) mode or the indirect 
(deferred) mode. 


In the direct mode, statements and commands are not 
Preceded by line numbers. They are executed as they are 
entered. Results of arithmetic and logical operations may 
be displayed immediately and stored for later use, bubcthe 
instructions themselves are not stored for later use. is 
mode is useful for debugging and for using the language 
@s a "calculator" for quick computations that do not 
require a complete program. 

indirect mode is used for entering programs. 
oan lines are preceded by line numbers and ae 
stored in memory. The program stored in memory 
executed by entering the RUN command. 


Line Format 


Program lines have the following format - square brackets 
indicate optional syntax: 


nnnnn BASIC statement[:BASIC statement...] <car ret>: 


Example: 
160 LET A=20:PRINT A 
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n, more than one statement may 
each statement on a line must 
be separated from the last by a colon. toe tos 
always begins with a line number, wi Mer a@ carriage 
return, and may contain a maximum ©) 55 characters. It 
is possible to extend a logical line over more than one 
physical line (the screen automatically wraps around). 


At the programmer's optio 
be placed on a line, but 


Line Numbers 


E ine begins with a line number. Line 
Tiimbeee EGE eSKO so in which the program lines are 
stored in memory and are also used as references when 
branching and editing. Line numbers must be in the range 
of 0 to 65529. A period (.) may be used in EDIT 
commands to refer to the current line. 


Character Set 


The character set is comprised of alphabetic characters, 
numeric characters and special characters. The alphabetic 
characters are the upper case and lower case letters of 
the alphabet. The numeric characters are the digits 0 
through 9, The following special characters and terminal 
keys are recognized: 


CHARACTER NAME 
Blank 
= Equal sign or assignment sign 
+ Plus sign 
- Minus sign 
cd Asterisk or multiplication symbol 
/ Slash or division symbol 


Up arrow or exponentiation 
symbol 


( Left parenthesis 
) Right parenthesis 
% Percent 
# Number (or pound) sign 
$ Dollar sign 
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Exclamation point 

Left bracket 

Right bracket 

Comma 

Period or decimal point 

Ampersand 

Single quotation mark (apostrophe) 
Semicolon 

Colon 

Question mark 

Less than 

Greater than 

Backslash or integer division symbol 
At-sign 

=) Underseore 

<delete> Deletes the character above the cursor 
<tab> Moves print position to next tab stop; tab 
stops are every eight columns 


=e 


@-VvVAy* 


<carriage 
return> Terminates input of a line 


Control Characters 


The following are the control characters. (Simultaneously 
press the Control key (CTRL) and the additional letter 
key specified below.) 


CTRL B Moves cursor to left word. 

CTRL C Interrupts program execution and returns to 
command level. 

CTRL F Moves cursor to right word. 

CTRL G Beeps the speaker. 

CTRL H Backspace. Deletes the character to the 


left of the cursor. 
CTRL I Tab. Tab stops are every eight columns. 
CTRL J Moves cursor to next physical line. 
CTRL O Halts program output while execution 
continues. A second CTRL O restarts output. 
Inserts the space at the cursor position. 
Suspends program execution. Any key except 
STOP resumes program execution. ’ 


CTRL R 
CTRL S 
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aes 


Constants 
values T-BASIC uses during 


execution. There are two types of conten Bie and 
numeric, A string constant is & cea Oe © 255 
characters enclosed in double quotation marks. xamples 
of string constants are: 


Constants are the actual 


"HELLO" 
"$25,000.00" 
"Number of Employees" 


Numeric constants are positive or negative numbers. 
Numeric constants cannot contain commas. The following 
are the five types of numeric constants: 


1. Integer Constants 
Whole numbers between -32768 and +32767. Integer 


constants do not have decimal points. 


2. Fixed Point f 
Positive or negative real numbers. That is, constant 
numbers that contain decimal points. 


be 


Floating Point 

Positive or negative numbers represented in Point 
exponential form (similar to scientific constants 
notation). A floating point constant consists of an 
optionally signed integer or fixed point number (the 
mantissa) followed by the letter E and an optionally 
signed integer (the exponent). The allowable range for 
floating point constants is: 


1078 to 10°38, 
Examples: 


235.988E-7 = .0000235988 
2359E6 = 2359000000 


(Double precision floating point constants use the 
letter D instead of E.) 
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4. Hex constants 
Hexadecimal numbers with the prefix &H. 
Examples: 
&H76 
&H32F 
5. Octal constants 
Octal numbers with the prefix &O or &. 
Examples: 
&0347 
&1234 


Single And Double Precision Form For Numeric Constants 


Numeric constants may be either single precision or 
double precision numbers. The single precision numbers 
are stored with seven digits of precision and printed with 
up to six digits. With double precision, the numbers are 
Stored with 16 digits of precision and printed with up to 
16 digits, 


fs single precision constant is any numeric constant that 
as: 

1. Seven or fewer digits, or | 
2. Exponential form using E , or i) 
3. A trailing exclamation point ( ! ) | 


A double precision constant is any numeric constant that 1 
aS: | 
1. Eight or more digits, or 
2. Exponential form using D, or i 
3. A trailing number sign (#) | 


Examples: | 


Single Precision Double Precision 


Constants Constants 
46.8 345692811 
-1.09E-06 -1.09432D-06 
3489.0 3489.0# 
22.5! 7654321.1234 
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Variables 


Variables are names used to represent values that are 
used in a program, The value of a variable may be 
assigned explicitly by the programmer, or it may be 
assigned as the result of calculations in the Program. 
Before a variable is assigned a value, its value is set to 
zero. 


Variable Names and Declaration Characters 


Variable names may be any length up to 40 characters, 
The characters allowed in a variable name are letters, 
numbers and the decimal point. The first character must 
be a letter. Special type declaration characters are also 
allowed, as described below. 


A variable name may not be a reserved word. If a 
variable begins with FN, it is assumed to be a call to a 
user-defined function. Reserved words include all of the 
commands, statements, function names and operator names, 


Variables may represent either a numeric value or a 
string. String variable names are written with a dollar 
sign ($) as the last character. For example: IN} = 
"SALES REPORT". The dollar sign is a variable type 
declaration character; that is, it "declares" that the 
variable will represent a string. Numeric variable names 
may declare integer, single or double Precision values. 
The type declaration characters for these variable names 
are as follows: 


% Integer variable 
! Single precision variable 
# Double precision variable 


The default type for a numeric variable name is single 
precision. 
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Examples of variable names follow: 


Ply Declares a double precision value 
MINIMUM! Declares a single precision value 
LIMITS Declares an integer value 

NS Declares a string value 

ABC Represents a single precision value 


A second method is also available by which variable types 
May be declared. The statements DEFINT, DEFSTR, 
DEFSNG and DEFDBL may be included in a program to 
declare the types for certain variable names. 


Array Variables 


An array is a group or table of values referenced by the 
Same variable name. Each element in an array is 
referenced by an array variable that is subscripted with 
an integer or an integer expression. An array variable 
Name has as many subscripts as there are dimensions in 
the array. For example, V(10) would reference a value in 
a one-dimension array, T(1,4) would reference a value in 
a two-dimension array, and so on. The maximum number 
of dimensions for an array is 255. The maximum number 
of elements per dimension is 32767. 


Space Requirements 
Variables 
INTEGER 


SINGLE PRECISION 
DOUBLE PRECISION 


Arrays: 


INTEGER 2 per element 
SINGLE PRECISION 4 per element 
DOUBLE PRECISION 8 per element 
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Strings 
3 bytes overhead plus the present contents of the string. 
el 
Type Conversion A, 
‘ 
, i tant 

When necessary, T-BASIC will convert a numeric cons' 

from one ivbe to another. The following rules and 

examples should be kept in mind. 

1. If a numeric constant of one type is set equal to a ) 
numeric variable of a different type, the number will \ 
be stored as the type declared in the variable name. | 
(If a string variable is set equal to a numeric value or | 
vice versa, a "Type mismateh" error occurs.) 

Example: i} 

10 A% = 23.42 | 

20 PRINT A% | 

RUN i 

28 | 
(eel 

2. During expression evaluation, all the operands in an ed | 
arithmetic or relational operation are converted to the 
same degree of precision, that is, that of the most 
precise operand. Also, the result of an arithmetic 4 
operation is returned to this degree of precision. 

ALI 
Examples: i| 
10 D# = 6#/7 | 
20 PRINT D# 
RUN 
~8571428571428571 
The arithmetic was performed in double precision and 
the result was returned in D# as a double precision 
value. ( 
10 D = 6#/7 le Y a ii 
20 PRINT D iA se 
rr 
ff 
a 
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RUN 
+857143 


tee arithmetic was performed in double precision and 
le result was assigned to D (single precision variable), 
founded and printed as a single precision value. 


3. 


Logical operators convert their operands to integers 
and return an integer result. Operands must be in the 
Tange -32768 to 32767 or an "Overflow" error occurs. 


4 


When a floating point value is converted to an 
integer, the fractional portion is rounded. 


Example: 

10 C% = 55.88 
20 PRINT C% 
RUN 

56 


5. If a double precision variable is assigned a single 
precision value, only the first seven digits of the 
rounded converted number will be valid. This is 
because only seven digits of accuracy were supplied 
with the single precision value. The absolute value of 
the difference between the printed double precision 
number and the original single precision value will be 
Jess than 6.3E-8 times the original single precision 
value. 


Example: 

10 A = 2.04 

20 BE=A 

30 PRINT A;BH 
RUN 

2.04  2.039999961853027 


6. NOTE: Numeric values are stored with the binary 
format in memory, so their fractional parts can not be 
stored exactly and the system yields only an 
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this, the result of a 


+ e of 
approximate value. Becaus' a round-off error, as 


calculation by T-BASIC may include 
shown in the following examples: 


Result B: Result By ‘ 
Basrensicn T-BASIC Decimal Math 
100.1-100 0.0999985 uit 
INT(2.6*12-0.2) 30 3 


Expressions And Operators 


An expression may be simply a string or numeric constant, 
or a variable; or it may combine constants and variables 
with operators to produce a single value. Operators 
perform mathematical or logical operations on values. 
The operators provided may be divided into four 
categories. 


1. Arithmetic 
2. Relational 
3. Logical 

4. Functional 


Arithmetic Operators 


The arithmetic operators, in order of precedence, are: 


Operator 
Expression Operation Sample 
x Exponentiation. K°Y 
= Negation -X 
Syl Multiplication, Division X*Y, X/Y 
+- Addition, Subtraction X+Y, K-Y 


To change the order in which the operations are 
performed, use parenthesis. Operations within parentheses 
are performed first. Inside parenthesis, the usual order of 
operations is maintained. Here are some sample algebraic 
expressions and their programming counterparts: 
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Algebraic Expression 


Programming Expressions 


X+2y X+28Y 

XY X-Y/Z 
Z 

xy X*Y/Z 
Z 

X+Y (xtYY/Z 
Z 

(x%)¥ (x-2yr'y 
2 

x X-(Y"Z) 

X¢Y) X*(CY) 


Two consecutive 


operators must be 
parentheses, 


separated by 


Integer Division And Modulus Arithmetic 


Two additional operators are available with T-BASIC and 
T-DISK BASIC: integer division and modulus arithmetic. 


Integer division is denoted by the backslash (\). The 
operands are rounded to integers (must be in the range 
-32768 to 32767) before the division is performed, and the 
quotient is truncated to an integer. 

For example: 10\4= 2 or 25.68\6.99 = 3 

The precedence of integer division is just after 
multiplication and floating point division. 


Modulus arithmetic is denoted by the operator:-MOD. It 


gives the integer value that is the remainder of an 
integer division. 
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For example: 


10.4 MOD 4 = 2 
25.68 MOD 6.99 


The precedence of mi 


division. 


Overflow And Division BY Zero 


If a division by zer' 
of an expression, the followng occurs; 
zero" error message is. Ce 
i erator is SU| 
alvision; oe erecinGn continues. If the evaluation of 
an exponentiation results in zero being raised to a \j 
negative power, the following occurs: c ion | | 
zero” error message is displayed; positive machine infinity i] 


division; 


execution continues. 


is supplied as the result of the exponentiation; and | 


If overflow occurs, the "Overflow" 


displayed; 
sign is supplie 


machine infinity w' 
das the result and exec! 


Relational Operators 


Relational operators are us 
The result of the co 
"false" (0). 


Operator 
oO 
< 
> 
é 


=2 with & remainder 2) 
Oe e/n=3 with @ remainder 5) 


odulus arithmetic is just after integer 


g the evaluation 
the "Division by 
chine infinity with 
das the result of the \f 


9 is encountered durin 


mai 


the "Division by 


ed to compare two values. 


error message is @ ——— 
ith the algebraically correct 
ution continues. 


mparison is either "true (1) or | 
This result may then be used to make a 
decision regarding program flow. (See IF.) } 
iI 
Relation Tested Expression 
Equality X=Y 
Inequality KOY | 
Less than K<Y 
Greater than RY . i 
Less than or equal to XGY ‘~ ‘ 
Greater than or equal to K=Y = — 
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(The e 
© qual sign is . 
Variable, ee TET.) also used to assign a value to a 


When arith, 

metic and relational 
chalexphesel relational operators are combined i, 
F ion, the arithmetic is al ieee 
oe eerie the eee ways performed first. 


X+Y < (T-1)/Z 


is true if 
the value of X plus Y is le: 

ene SS 

T-1 divided by Z. More examples: than thesyaluelgt 


IF SIN(X) < 0 GOTO 1000 
IF J <> 0 THEN K=K+1 


Logical Operators 


Logical operators 

Nf perform tests ot i i 

ation. or Boolean operations’ rr parte oe 
‘ns a bitwise ich is ei 

Peaaie ee result which is either "true" (not zero) 

Performed after arithmetic and relational operations. 


outcome of a logical jon i i 
tiektoliowing fogies operation is determined as shown in 


The logical operator 


In an expression, logical operations are 
The 


The operators are listed in order of 


precedence. 

NoT | 
X NOT X 1 

i 0 | 

0 1 | 

\] 

AND i 

X AND Y i 


Cone 
Cron. 
coor 


} 
gui Ie 
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OR 


X Y X OR Y 

1 1 1 

Te eG 1 

o 1 1 

0 0 0 
XOR 

XK Yi RAZORS 

1 er 0 

1 0 1 

mea’ 1 

Oro 0 
IMP 

KY NCI 

1 1 1 

50 0 

nee 1 

0 0 1 
EQV 

xX Y XEQVY 

ie wath 1 

aarO 0 

Oneal 0 

Oe 1 


Just as the relational operators can be used to make 
decisions regarding program flow, logical operators can 
connect two or more relations and return a true or false 
value to be used in a decision. (See IF.) For example: 


IF D<200 AND F<4 THEN 80 
IF I>10 OR K<O THEN 50 
IF NOT P THEN 100 


Logical operators work by converting their operands to 
sixteen bit, signed, two's complement integers in the 
range -32768 to +32767. (If the operands are not in this 
range, an error results.) If both operands are 


PAD8111-1 ~36- 


Supplied as 0 or -1, logical operators return 0 or -1. The 
fen Operation is performed on these integers in bitwise 
fea That is, each bit of the result is determined by 
he Corresponding bits in the two operands, 


Thus, it is Possible to use logical operators to test bytes 
for a particular bit pattern. For instance, the AND 
perator may be used to "mask" all but one of the bits of 
& status byte at a machine I/O port. The OR operator 
may be used to "merge" two bytes to create a particular 


binary value. The following examples will help 

demonstrate how the logical operators work. 

63 AND 16=16 63 = binary 111111 and 16 = binary 
10000. So 63 and 16 = 16 

15 AND 14=14 15 = binary 1111 and 14 = binary 
1110. So 15 AND 14 = 14 (binary 
1110) | 

2 | 

-1 AND 8=8 -1 = binary 1111111111111111 and 8 — 
= binary 1000. So -1 AND 8 = 8 

4 OR 2=6 4 = binary 100 and 2 = binary 10, 
So 4 OR 2 = 6 (binary 110) 

10 OR, 10=10 10 = binary 1010. So 1010 OR 1010 i 
= 1010 (decimal 10) 

-1 OR -2=-1 = binary 1111111111111111 and -2 


= binary 1111111111111110. So -1 
OR -2 = -1. The complement of 
sixteen zeros is sixteen ones, 
which is the two's complement 
representation of -1. 


NOT X=-(X+1) The two's complement of any integer 


is the bit complement plus one. 
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SS 


Functional Operators 


A function is used in an 
predetermined operation that alae 
operand, "Intrinsic" functions r He ities 
ie SQR (square root) or SIN (sine). All _ et 
functions are described in Section Aaninet¥ ake a6 
functions that are written by the prog! 


allowed. 


String Operations 


Strings may be concatenated using + 


expression to call a 
be performed on an 
in the system, such 


For example: 


10 A$="FILE" : B$="NAME" 

20 PRINT A$ + BS 

30 PRINT "NEW "+ A$ + BS 

RUN 

FILENAME 

NEW FILENAME 
Strings may be compared using the same relational 
operators that are used with numbers: 

= ks > <= OF 
String comparisons are made by taking one character at a 
time from each string and comparing the ASCII codes. If 
all the ASCII codes are the same, the strings are equal. 
If the ASCII codes differ, the lower code number 
precedes the higher. If the end of one string is reached 
during string comparison, the shorter string is said to be 
smaller. Leading and trailing blanks are significant. 
Character ASCII codes are shown in Appendix C. 


Examples: 
NAA" ¢ "ABN 
"FILENAME" = "FILENAME" 
uxge > 1X HT 
"CL " > "CL" 
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"ke" > nx, 
Gn 
uy tae < "SMYTHE" 
$< "9/12/g2" where B$ = "8/12/82" 


Thus, i a 

or to nie comparisons can be used to test string values 
comparises labetize strings. All string constants used in 
marks, expressions must be enclosed in quotation 


Input Editin, 


If an incor 
rect character is entered i i i 
r ed as a line is 
Ong! it an be deleted with the DELETE key or vith 
~ + Once a character has been delet i 
continue typing the line as desired. eel 


To correct pro; i 

8 ‘ogram lines for a program that is currentl: 
iano ae retype the line using the same ling 
the me a o ine will automatically be replaced with 


More sophisticated editin iliti 
ig capabilities are provided. 
eect the program, (screen edit), retype the changes 
eae eeek after moving the cursor to the necessary 
. These corrections are effecti 
type a carriage return. “Ye pORly A easy 


To delete the entire program that is currently residing in 


memory, enter the NEW command. NEW is us 
* l. ual: 
to clear memory prior to entering a new program. Bae 


Error Messages 
If an error causes program execution to terminate, an 


error message is printed. For a complete li: 
is 
codes and error messages, see Appendix 5, aac 
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COMMANDS AND STATEMENTS 


How To Use Section 2 

The Commands and Statements are aaron (a 
alphabetical order. You may want ie eh ar rie 
explanation for each one first se Fee 
comprehensive instructions only as needed. Sr p 
use T-BASIC for both Commands, Statemen' an 


Functions. Only those with @ Floppy Disk Drive Unit 
have use of the T-DISK BASIC capabilities. 


if you do not have a Floppy Disk Drive 
TRE ge TaAy wan to read the T-DISK BASIC Commands, 
Statements and Functions after you have learned T-BASIC 
to see what T-DISK BASIC offers. The easy 
expandability to the additional power that floppy disk 
drives offer is one of the advantages of the Toshiba T100. 


Command/Statement Format Notation 


Wherever the format for a statement or command is 
given, the following rules apply. Be sure that you 
incorporate them when you formulate your own 
instructions. 

1. Items in CAPITAL LETTERS must be input as shown. 

2. Items in lower case letters enclosed in angle brackets 
(< >) are to be supplied by the user. 

3. Items in square brackets ({ ]) are optional. 

4. All punctuation except angle brackets and square 
brackets (that is, commas, parentheses, semicolons, 
hyphens, equal signs, and quotation marks) must be 
included as shown. 

5. Items followed by an ellipsis (...) may be repeated 
any number of times (up to the length of the line). 

6. <filename> is constructed with a device number and a 
filename. The form of <filename> is the following: 
"device-number : file-name". The device number is 1, 
2, 3 or 4 for disk drives or 5 for RAM PACK. The 
filename is nine characters in the form xxxxxx.XXxx. 
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AUTO 


Generates a line number automatically after every 
Carriage return. 


FORMAT 
VERSIONS 
REMARKS 
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AUTO [<line number>[,<increment>]] 
T-BASIC, T-DISK BASIC 


o AUTO begins numbering at <line number> 
and inerements each subsequent line 
number by <increment>. 


© The default for both values is 10. If <line 
number> is followed by a comma but 
<inerement> is not specified, the last 
increment specified in an AUTO command 
is assumed. 


o If AUTO generates a line number that is 


already being used, it prints an asterisk 
after the number, warning that any input 
will replace the existing line. Typing a 
earriage return immediately after the 
asterisk deletes the old line and generates 
the next line number in T-BASIC. In 
T-DISK BASIC, the old line is saved and 
the next line number is generated. 


o AUTO is terminated by typing the BREAK 


key or Control-C. The line in which 
BREAK or Control-C is typed is not 
saved. After the BREAK key “or Control-C 
is typed, T-BASIC returns to command 
level. 
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EXAM 7 
PME AUTO 100,50 Generates line numbers 100, ™ 
150, 200 if BLOAD#-1 
— L a 
line numbers 10, 20, 7 oads a 7 * 
AUTO Gente I bs | ( fremory, machine language program from cassette into 
, | 
i 
} FORMAT — BLOAD#-1,"<filename>'T,<start-adr>] 
BLOAD VERS 
from disk or RAM q IONS T-BASIC, T-DISK BASIC 
Loads a machine language program from N | | 
oat NOTE: Files designated by this ) } REMARKS 0 This is the version of the BLOAD 


PACK into memory. t 
statement must have been previously saved using the 


BSAVE statement. 


statement for cassette tape, 


© <filename> does not include th i 
| sftenan le device 


FORMAT BLOAD "éfilename>"(, <start-adr>] r 
OTE Any key-touch during program loading from 


VERSIONS T-BASIC, T-DISK BASIC | cassette causes "Tape-Read Error." 


REMARKS o <filename> designates a file to be loaded. i —- 
4 BSAVE 


o <start-adr> designates _— the beginning 
memory address where the file is loaded. 
If <start-adr> is omitted, BLOAD uses the a) 
address given in the BSAVE statement. 


Saves a machine language program i is 
Ba eacns guage prog on either disk or 


o Opened files will remain open after this i FORMAT BSAVE"<filename>", <start-adr>, <size> 
, , 


statement executes. 
VERSIONS T-BASIC, T-DISK BASIC 
EXAMPLE REMARKS  <start-adr> indicates th i 
est 
BLOAD "1:SAMPLI" address of the program to prac ima 
| 
BLOAD "1:SAMPL1",&HE000 © <size> defines the length of the program 
~ | EXAMPLE 
ne BSAVE "l:PROG1",&HE000,&HODO00 
— 
| j BLOAD "1:PROG1" 
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BSAVE#-1 


Saves a machine language program on magnetic tape. 


BSAVE#-1"<filename>", <start-adr>, <size> 


FORMAT 
VERSIONS T-BASIC, T-DISK BASIC 
REMARKS 0 <filename> does not include the device 


number, Same as BSAVE except storage 
device, 

o This is the version of the BSAVE 
statement for magnetic tape. 


CALL 


Calls an external assembly language subroutine from 


BASIC. The CALL statement is one way to transfer 
program flow to an external subroutine. (See USR 
function.) 
FORMAT —CALL<variable name>[(<argument list>)] 
VERSIONS T-BASIC, T-DISK BASIC 
REMARKS 0 <variable name> contains an address that 
is the starting point in memory of the 
Subroutine and may not be an array 
variable name. 
© <argument list> contains the arguments 
that are passed to the external subroutine 
and may contain variables only. 
PAD8111-1 errs 


w! 
ast 


: 


EXAMPLE 110 MYROUT=&HD000 


120 CALL MYROUT(I,J,K) 


CHAIN 


Calls a program and passes variables to it from the 
currently running program. 


FORMAT CHAIN [MERGE] <filename>[,[<line number 


expression>] [,ALL] [,DELETE<range>]] 
VERSIONS 
REMARKS 


T-BASIC, T-DISK BASIC 


© <filename> is the name of the program 
that is called. Example: CHAIN"PROG1" 


o <line number expression> is a line number, 
or an expression that calculates a line 
number, in the called program. 


It is the 


starting point for execution of the called 


program. If it is omitted, execution begins 
at the first line. Example: 
CHAIN"PROG1",1000 


© <line number expression> is not affected 
by a RENUM command. 


© The ALL option passes every variable in 
the current program to the called 
Program. If the ALL option is omitted, 
the current program must contain a 
COMMON statement to list the variables 
that are passed. Example: 


CHAIN"PROG1",1000,ALL 
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i broutine to 
tion allows a su! 

Y be b MTaNe UNG the current BASIC program 
zhane erlay. A MERGE operation is 
fe for ad with the current program and 
the vealed program. The anes program 

file if it is to 
TRRGES ee Example: CHAIN 


MERGE"1:OVRLAY", 1000 


i E£ option 
tatement with MERG 
. oes ties oe and preserves the current 


OPTION BASE setting. 


o If the MERGE option is omitted, CHAIN 
does not preserve variable types or 
user-defined functions for use by the 
chained program. Specifically: n When 
MERGE is omitted and ALL is not 
designated, these statements are ignored: 
DEFINT, DEFSNG, DEFDBL, DEFSTR, DEF 
FN, OPTION BASE, ON ERROR and GOTO, 


o When MERGE is omitted and ALL is 
designated, DEF FN, OPTION BASE, ON 
ERROR GOTO are ignored, 


o After an overlay is brought in, it is 
usually desirable to delete it so that a 
new overlay may be brought in. To do 
this, use the DELETE option. Example: 
CHAIN MERGE"OVRLAY",1000, DELETE 
1000-5000. The line numbers in <range> 
are affected by the RENUM command. 


Draws 
Ss 


FORMAT 


VERSIONS 
REMARKS 
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CIRCLE 


€ circle or an ellipse. NOTE: Sereen 1 or 
ereen 2 must be executed before using CIRCLE. 


CIRCLE [STEPKX,Y),<radius>[,[<color 
number>],[<start>],[<end>] [,<aspect>] 


T-BASIC, T-DISK BASIC 


© CIRCLE draws an ellipse centered at a 
coordinate that can be designated in one 
of two formats: (1) STEP(X,Y) 

(2) (X,Y) 


o The first form STEP(X,Y), is a relative 
address from the current coordinate point 
(most recent reference), 


© The second form (X,Y) is an absolute 

address. (X,Y) must be in the range of 
(0,0) to (639,199) depending on the 
resolution of the CRT. 


© <radius> defines the radius of a circle, or 
the X-radius of an ellipse, in the number 
of dots. (See SCREEN command for 
definition of "dots.") 


© <color number>: a number in the range of 
0-7 (see COLOR command). Defines a 
color for drawing the circle or ellipse. The 
default is the foreground color. 


© <start> and <end> are used as a pair to 
draw a part of a circle or an ellipse. 
They define the start and end points of an 
are in radians between 0 and 2*PI 
respectively. 
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SS 


EXAMPLE CLEAR 


i ive, th 
d angle is negative, the CLEAR ,32768 


n 
o If the start or ©! ected to the center 


ellipse will beeonnested to. Wie ie CLEAR ,,2000 
point with a line and 0 ‘saitivel (Note CLEAR ,32768,2000 


ted as if they 
thet this is different than adding 2*PI.) 
7 an aspect ratio: X radius 
o <aspect> een the aspect ratio is less 


radius. spect ral ; 
a ones then the radius is given in X, 


and if it is greater than one, in Y. The 
default is 1—a circle. 


CLOAD 


Loads a program or an array from cassette tape into 
memory. 


PEPER By 3 ee 


FORMAT 


EXAMPLE 10 SCREEN 1 

20 WIDTH 80 

30 CLS 

40 CIRCLE (20,30),10,2 

50 CIRCLE (50,60),5,3,1,5,6 
60 CIRCLE (100,70),20,,,,5 


CLOAD "<filename>" 


CLOAD? "<filename>" 


VERSIONS T-BASIC, T-DISK BASIC 


REMARKS 


© CLOAD executes a NEW command before 
it loads the program from cassette tape. 


CLEAR 


Sets all numeric variables to zero, all string variables 
to null, and closes all open files. It will also, 
optionally, set the end of memory and the amount of 


stack space. 


<filename> does not include the device 
number, and is the string expression or the 
first character of the string expression 
that was specified when the program was 
CSAVEd. 


FORMAT CLEAR (,{<expression1>] (,<expression2>]] © CLOAD? verifies tapes by comparing the 

program currently in memory with the file 
| on tape that has the same filename. If 
{ 


| they are the same, T-BASIC prints Ok; if 


VERSIONS T-BASIC, T-DISK BASIC 


REMARKS 0 The <expressionl> option calculates the 
highest memory location available for use 
by T-BASIC. 


not it prints NO GOOD. 


olf no <filename> is given, the first file 
found is loaded. 


o The <expression2> option allocates stack 
space for T-BASIC. The default is 512 
bytes, or one-eighth of the available 

memory, whichever is smaller. 


EXAMPLE CLOAD "MAX2" 


Loads the specified file into memory. 
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CLOSE 


Closes specified disk files or all open files, depending 
upon arguments, 


FORMAT CLOSE[[#kfile number>[,[#]<file number...>]] 


VERSIONS T-BASIC, T-DISK BASIC 


REMARKS 0 <file number> is the number under which 
the file was OPENed. 


A CLOSE with no arguments closes all 
open files. 


° 


© The association between a particular file 
and file number terminates upon execution 
of a CLOSE. The file may then be 
reOPENed using the same file number or a 
different file number. Likewise, the 
previously assigned file number may now 
be reused to OPEN any file. 


© A CLOSE on a_ sequential output file 
writes the final buffer of output. 


° 


The END statement and NEW command 
always CLOSE all disk files automatically. 
The RUN and LOAD commands also CLOSE 
all disk files if used without R argument. 
BREAK does not close disk files, 


EXAMPLE See Appendix A. 
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© This statement interacts with the ON COM 
GOSUB statement execution. If interrupts 
are enabled, and the ON COM GOSUB 
statement has already executed, the 
subroutine specified by the ON COM 
GOSUB statement executes upon interrupt. 


EXAMPLE 
50 ON COM GOSUB 200,300 


100 COM(-3) ON 


300 REM RECEIVE-SUBROUTINE 


COMMON 


Passes variables to a CHAINed program. The 
COMMON statement is used in conjunction with the 
CHAIN statement. 


FORMAT COMMON <list of variables> 

VERSIONS T-BASIC, T-DISK BASIC 

REMARKS o COMMON statements may appear anywhere 
in a program, though it is recommended 
that they appear at the beginning. 


o The same variable cannot appear in more 
than one COMMON statement. 


o Array variables are specified by appending 
"(" to the variable name. 


olf all variables are to be passed, use 


CHAIN with the ALL option and omit the 
COMMON statement. 
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EXAMPLE 100 COMMON A,B,C,D0,6$ 
110 CHAIN "pRoG3",10 


: CLs 


f , Cl 
7 lears the screen and repositions the cursor. 


FORMAT LS 


CONT 


VERSIONS T-BASIC, T-DISK BASIC 


i ogram execution t REMAR : 

BREAS Re or Control-C has been we or after @ Keo pre ecommend clears the screen and 
been executed. a cursoreat 

STOP or END statement has elt? oe “Gulcts ee 


continue after the 


EXAMPLE 
FORMAT CONT CLS 


VERSIONS T-BASIC, T-DISK BASIC 


REMARKS 0 Execution resumes at the point where the COLOR 
break occurred. If the break occurred =a 
after a prompt from an INPUT statement, , ; 

execution continues with the reprinting of Designates foreground and background color. 
the prompt (? or prompt string). | 


o CONT is usually used in conjunction with FORMAT COLOR [<color number>] [,<color number>] 
the STOP command for debugging. CONT ) VERSIONS 
is invalid if the program has been edited T-BASIC, T-DISK BASIC 
during the break. 
REMARKS o The first argument (<eolor —number> 
© When execution is stopped, intermediate specifies a foreground color; the mer 
values may be examined and changed using specifies a background color. Both color 
direct mode statements, Execution may be | numbers must be one of the following: 
resumed with CONT or a direct mode zs 
GOTO, which resumes execution at @& 0 = BLACK 
specified line number. BLUE 
| RED 
EXAMPLE See example of STOP statement. - ; MAGENTA 
. GREEN 
CYAN 
YELLOW 
WHITE 
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© Cold start supplies COLOR 7,0. 
o The default for the arguments keep the 
colors unchanged. 


EXAMPLE 1 
COLOR 2 


EXAMPLE 2 
COLOR 3,5 


ore 
COM 


Controls interrupts from the RS-232C interface port. 


FORMAT COM(<channel>) ON or 
COM(<channel>) OFF or 
COM(<channel>) STOP 

VERSIONS T-DISK BASIC 


REMARKS 0 <channel> is either -3 or -4. 

| o COM(<channel>) ON enables interrupts. 

o COM(<channel>) OFF disables interrupts. 

© COM(<channel>) STOP holds an interrupt 
until execution of COM(<channel>) ON 
enables the interrupt. 


o Initial setting for the COM statement is 
OFF status. 


o An interrupt occurs at each arrival of a 
byte of data. 


PAD8111-1 -52- 


CSAVE 


Saves the program currently in memory on cassette 
tape. Before a CSAVE is executed, make sure the 
Cassette recorder is properly connected and in the 
Record mode. Also see CLOAD. 


FORMAT CSAVE "<filename>" 
VERSIONS T-BASIC, T-DISK BASIC 


REMARKS 0 Each program saved on tape is identified 
by a filename. 


© CSAVE may be used as a _ program 
statement or as a direct mode command, 


EXAMPLE CSAVE "TIMER" 


Saves the program currently in memory on 
cassette under filename "T". 


DATA 


Contains the numeric and string constants that are 
accessed by the program's READ statement(s). (See 
READ.) DATA statements are nonexecutable and may 
be placed anywhere in a program. 


FORMAT DATA <list of constants> 


VERSIONS T-BASIC, T-DISK BASIC 
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REMARKS o A DATA statement 


EXAMPLE 
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may contain as many 
constants as will fit on a line Oa 
by commas), and any number ie 
statements may be used in & program. 
aceess DATA statements 
ne mber). Data contained 
is treated as one 


o READ stateme! 
in order (by line ve 
in DATA  statemen 
continuous list of items— regardless of tow 
many items are on a line or where e 

lines are placed in the program. 


i tain numeric 
© <list of constants> may conta e 
constants in any format (fixed point, 
floating point or integer). 
o No numeric expressions are allowed in the 
list. 


© String constants in DATA statements must 
be surrounded by double quotation marks 
only if they contain commas, eolons or 
significant leading or trailing spaces. 
Otherwise, quotation marks are not needed. 


o The variable type (numeric or string) in 
the READ statement must agree with the 
corresponding constant in the DATA 
statement. 


© DATA statements may be reread from the 
beginning using the RESTORE statement. 


See examples in READ statement. 


DEF FN 


Allows the user to define 
2 and name a function, 
EN is illegal in the direct mode. opm 


FORMAT 


VERSIONS 
REMARKS 
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DEF FN<name>[{(<parameter _list>: i 
definition> te 


T-BASIC, T-DISK BASIC 


° Siem? must be a legal variable name. 
is name, preceded by FN, becomes 
name of the function. He 


© <parameter list> is comprised of those 
variable names in the function definition 
that are to be replaced when the function 
is called. The items in the list are 
separated by commas. 


° <funetion definition> is an expression, 
limited to one line, that performs the 
operation of the function. Variable names 
that appear in this expression serve only 
to define the function; they do not affect 
program variables that have the same name. 


oA variable name used in a function 
definition may or may not appear in the 
parameter list. If it does, the value of 
the parameter is supplied when the 
function is called, Otherwise, the current 
value of the variable is used. 


olf a type is specified in th iT 

le function 
mame, the value of the expression is 
forced to that type before it is 


i If a 
ealling statement. 
ied in the function name and 
type does not match, @ 
error occurs. 


returned to tl 
type is specifi 
the argument 
"Type mismatch" 
must be executed 
it defines may be 
n is called before it 
an “Undefined user 


oA DEF FN statement 
before the function 
called. If a functio! 
has been defined, 
function" error occurs. 


EXAMPLE 


410 DEF ENAB (X,Y=X*COS(Y) 
420 T=FNABULJ) 


Line 410 defines the function FNAB. The 
function is called in line 420. 


DEFINT/SNG/DBL/STR 


Declares variable types as integer, single precision, 
double precision, or string. 


FORMAT DEF<type> <range(s) of letters> 
where <type> is INT, SNG, DBL, or STR 


VERSIONS T-BASIC, T-DISK BASIC 


REMARKS o DEFtype declares the type for variable 
names beginning with the letter(s) specified 
in the range argument. A type declaration 
character always takes precedence over a 
DEFtype statement in typing a variable. 


olf no type declaration statements are 
encountered, T-BASIC assumes all 
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variables without declaration characters 
are single precision variables. 


EXAMPLE 10 DEFDBL L-P 
All variables beginning with the letters L, 
M, N, O and P will be double precision 
variables. 


10 DEFSTR A 
All variables beginning with the letter A will 
be string variables. 


10 DEFINT I-N,W-Z 

All variables beginning with the letters I, J, 
K, L, M, N, W, X, Y, Z will be integer 
variables. 


pe he _ DEF UsRetcied 


Specifies the starting address of an assembly language 
subroutine. Any number of DEF USR statements may 
appear in a program to redefine subroutine starting 
addresses. This allows access to as many subroutines 
as necessary. 


FORMAT DEF USR[<digit>F<integer expression> 

VERSIONS T-BASIC, T-DISK BASIC 

REMARKS o <digit> may be any digit from 0 to 9. 
The digit corresponds to the number of the 
USR routine whose address is being 
specified. 


If <digit> is omitted, DEF USRO is assumed. 
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7 expression> is the 
o The value of <integer ae routine, (See 


i ddress of the 
Appa F, Assembly Language = 
Subroutines.) — 3 
pecifies the maximum values for array variable 


Subseripts and allocates stora; it 
ge accordingly. 
Sets all the elements of the specified ane Rar 


EXAMPLE 
initial value of zero. 


200. DEF TSR OTT Nee) 
210 X=USRO(Y*2/2.' 
| FORMAT DIM <list of subseripted variables> 


VERSIONS T-BASIC, T-DISK BASIC 


REMARKS o If an array variable name is used without 
a DIM statement, the maximum value of its 
subscript(s) is assumed to be 10. 


DELETE 


Perec cts olfa subseript is used that is greater than 
ithe maximum — specified by DIM, a 
Subseript out of range" error occurs. 


FORMAT DELETEL<line number>] [-<line number>] ? . 
| } .- o The minimum value of a si P 
PERO eae ae ogee So | eee 0, unless otherwise seairece alte 
ie OP’ 
REMARKS 0 BASIC always returns to command level f TION BASE statement. 
after executing DELETE. EXAMPLE 10 DIM A(10) 
20 FOR I=0 TO 10 


30 READ A(I) 
40 NEXT I 
50 DATA 1,2,3,4,5,6,7,8,9,10,11 


o If <line number> does not exist, an "Illegal 
funetion call" error occurs. 


EXAMPLE DELETE 40 Deletes line 40 


DELETE 40-100 Deletes lines 40 through 
100, inclusive 


DELETE-40 Deletes all lines up to and 
including line 40 
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DRAW 
SCREEN 1 or 


line or lines with dots. ae 
BGRERE) oer htiist be executed prior to executing 


DRAW. 


FORMAT 
VERSIONS 
REMARKS 
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DRAW <string expression> 


T-DISK BASIC 


line or lines 

o The draw statement draws & 
defined by the character string argument, 
The character string is a series of meses 
commands ealled "Graphic acro 


Language"(GML). 


o The 14 GML commands are divided into 
two groups: 


o (Group 1) 
o Eight GML commands in Group 1 have the 


following format: 


[<prefix command>]<command>[, <distance>] 


© <prefix command> defines the drawing 
motion. 


o <command> defines line direction. 


o <distance> defines the length of the line 
to be drawn equal to the number of dots. 
(The default value is 1.) 


© <prefix command> must be "B" or "N": 
B ... allows moving the graphics pointer 
without plotting. N ... returns the 
graphics pointer to starting position after 
move. 
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© <command> defines the direction of the 
line to be drawn starting from the current 
graphics position, according to the 
following values: 


<eommand> (direction) 
upward 
downward 
left 
right 
diagonally up right 
diagonally up left 
diagonally down left 
diagonally down right 


o The other GML Group 1 command is a 
general purpose line drawing command of 
form: 


M _[ésign>}<x>, [<sign>]<y> 


where x and y are coordinate values in 
the range (0,0) to (639,199). 


o This command draws a line from the 
current graphics position to the point 
defined by x and y. 


© The coordinate values can be either an 
absolute value expressed as (x,y), or a 
Telative value preceeded by "+" or "a! 
(such as (+x,-y)). 


o (Group 2) 
o There are four GML Group 2 commands: 


© A<angle> This command rotates 
coordinate axis in 90 degree 
increments. 


ue must be 0, 1, 2 or 
to 0 degrees, 90 
rees and 270 degrees. 


The <angle> val 
3 corresponding 
degrees, 180 deg! 


° 


° 


lor_number> 
hiss command designates a color for 
the line to be drawn. The color is 
selected from the color numbers (0 to 


7). (See COLOR command.) 


factor> 7 
Seco mand specifies the size of a 
dot by the <scale factor> in the 
range of 1 to 255. The <scale 
factor> is multiplied by the argument 
édistance> given with the U, D, L, R, 
E, F, H, G or relative M commands, 
to get the actual distance traveled. 


° 


° 


x__<strings> P 
This powerful command allows nesting 
drawing actions. It accepts a 
sub-string of GML commands and 
executes them in sequence. 


NOTE Numeric arguments can be constants such 
as "123" or "= variable:" where the 
variable is the name of a variable. 


EXAMPLE 5 WIDTH 80 
10 SCREEN 1 
20 CIRCLE (80,50),30 
30 A$="M50,30" 
40 S$="M40,30XA$;" 
50 DRAW S$ 
RUN 
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DSKO$ 


Writes a sector of data onto disk. Prior to 
executing DSKO$, 256 bytes of data must be stored 
into buffer 0 by LSET or RSET. Then DSKO$ 
can write the data in buffer 0 onto disk at the 
designated sector. 


FORMAT DSKO$ <drive number>,<head number>,<track 
number>,<sector number> 


VERSIONS T-BASIC, T-DISK BASIC 


REMARKS oo <drive number> is an integer from 1 to 4, 


o <head number> is 0 or 1. 

o <track number> is an integer from 0 to 34, 

o <sector number> is an integer from 1 to 16. 
EXAMPLE at FIELD#0 ,10 AS X$, 5 AS Y$ 


30 
40 DSKO$ 1,1,30,10 


EDIT 


Displays a line for editing. The EDIT command 
displays the specified line and positions the cursor 
under the first character of the line. 


FORMAT EDIT <line number> 
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VERSIONS 


REMARKS 


T-BASIC, T-DISK BASIC 
© <line number> in an existing program. 


o A period (.) ean be used in <line number> 


to specify the current line. 


END. 


Terminates program executit 


ion, closes all files and 


returns BASIC to command level. 


FORMAT 
VERSIONS 
REMARKS 


EXAMPLE 


END 
T-BASIC, T-DISK BASIC 


© END statements may be placed anywhere in 
the program to terminate execution. 


o Unlike the STOP statment, END does not 
cause a BREAK message to be printed. 


o An END statement at the end of a 
program is optional. 


o T-BASIC always returns to command level 
after an END is executed. 


520 IF K>1000 THEN END ELSE GOTO 20 


ERASE 


Eliminates arrays from a program. 


FORMAT 
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ERASE <list of array variables> 


VERSIONS 


REMARKS 


EXAMPLE 


T-BASIC, T-DISK BASIC 


o Arrays may be redimensioned after they 
are ERASEd, or the previously allocated 
array space in memory may be used for 
other purposes. 


If an attempt is made to redimension an 
array without first ERASEing it, a 
"Redimensioned array" error occurs. 


450 ERASE A,B 
460 DIM B(99) 


ERR and ERL VARIABLES 


ERR and ERL are reserved variables used in an error 
handling subroutine. ERR contains the error code 
and ERL contains the line number in which the error 
was detected. 


REMARKS 
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o The ERR and ERL variables are usually 
used in IF...THEN statements to direct 
program flow in the error trap routine. 


If the statement that caused the error was 
a direct mode state ‘ent, ERL will contain 
65535. To test if un error occurred in a 
direct statement, use IF 65535 = ERL 
THEN ... 

Otherwise, use: 


= error code THEN . 
= line number THEN ... 


=67= 


ET EE 


the right side 


‘, i in 
© If the line number is not © it cannot be 


of the relational operator, 
renumbered by RENUM. 


and ERR are reserved 


o Because ERL r to the left 


variables, neither may ies 
of the equal sign in & 

ansigAaNe) statement. wanes error 
codes are listed in Appendix B. 


ERROR 


i b imulate the 
Can be used in two ways: 1) to simu 
occurrence of a BASIC error; or 2) to allow the 
user to define error codes. 


FORMAT ERROR <integer expression> 
VERSIONS T-BASIC, T-DISK BASIC 


REMARKS 0 The value of <integer expression> must be 
greater than 0 and less than 255. 


o If the value of <integer expression> equals 
an error code already in use by T-BASIC 
(see Appendix B), the ERROR statement 
will simulate the occurence of that error, 
and print. the corresponding error 
message. (See Example 1.) 


o To define your own error code, use a 
value that is greater than any used for 
error codes. (Choose the highest values 
possible to avoid conflicts because more 
error codes may be added to future 
versions of T-BASIC.) 


o The user-defined: error code may be 


conveniently handled in an error trap 
routine. (See Example 2.) 
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EXAMPLE 1 


EXAMPLE 2 
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o If an ERROR statement specifies a code 
for which no error message has been 
defined, T-BASIC responds with the 
message UNPRINTABLE ERROR. 


Execution of an ERROR statement for 
which there is no error trap routine causes 
an error message to be printed and halts 
execution. 


30 ERROR S+T 
40 END 

Ok 

RUN 

String too long in 30 


Or, in direct mode: 

Ok 

ERROR 15 (you type this line) 

String too long (T-BASIC types this line) 
Ok 


110 ON ERROR GOTO 400 
120 INPUT "WHAT IS YOUR BET";B 
130 IF B > 5000 THEN ERROR 210 


400 IF ERR = 210 THEN PRINT "HOUSE 
LIMIT IS $5000" 
410 IF ERL = 130 THEN RESUME 120 


FIELD 


i dom file 
Allocates space for variables KS erated ones 
buffer. A FIELD statment must Garcon ito enter 
data out of a random buffer after & 


data before a PUT. 


FORMAT FIELD(# file number>, <field width> AS 


<string variable> 
VERSIONS T-BASIC, T-DISK BASIC 


REMARKS 0 <file number> is the number under which 
the file was OPENed. 


i i i haracters 
© <field width> is the number of cl 
to be allocated to <string variable>. For 
example, 


FIELD#1, 20 AS N$, 10 AS ID$, 40 AS 
ADD$ 


allocates the first 20 positions (bytes) in 
the random file buffer to the string 
variable N$, the next 10 positions to ID$, 
and the next 40 positions to ADD$. FIELD 
does NOT place any data in the random 
file buffer. (See LSET/RSET and GET.) 


° 


The total number of bytes allocated in a 
FIELD statement must not exceed the 
record length that was specified when the 
file was OPENed. Otherwise, a "Field 
overflow" error occurs. (The default 
record length is 128.) 
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o Any number of FIELD statements may be 
executed for the same file, and all FIELD 
Statements that have been executed are in 
effect at the same time. 
' EXAMPLE See Appendix A. 

NOTE: Do not use 4 FIELDed variable name in an 
INPUT or LET statement. Once a variable name 
is FIELDed, points to the correct place in 
the random file buffer. If a subsequent INPUT 
or LET statement with that variable name is 
executed, the variable's pointer is moved to 
string space. 


FILES and LFILES 


Displays a list of files on the CRT. 


FORMAT FILES <drive number> 
LFILES <drive number> 


VERSIONS  T-BASIC, T-DISK BASIC 
REMARKS o <drive number> is an integer from 1 to 5 


oA list of files is output to the CRT 
(FILES) or printer (LFILES). 


FOR...NEXT...STEP 


Allows a series of instructions to be performed in a 
loop a specified number of times. 


FORMAT FOR <variable>=x TO y [STEP z] 
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VERSIONS 


REMARKS 


PAD8111-1 


NEXT [<variable>] (,<variable>...] 


where x, y and z are numeric expressions. 


T-BASIC, T-DISK BASIC 


used as a counter. The first 
numeric expression (x) is the initial value 
of the counter. The second numeric 
expression (y) is the final value of the 
counter. 


© <variable> is 


o The program lines following the FOR 
statement are executed until the NEXT 
statement is encountered. Then the 
counter is incremented by the amount 
specified by STEP. 


© A check is performed to see if the value 
of the counter is now greater than the 
final value (y). If it is not greater, 
T-BASIC branches back to the statement 
after the FOR statement and the process 
is repeated. If it is greater, execution 
continues with the statement following the 
NEXT statement. This is a FOR...NEXT 
loop. 


o If STEP is not specified, the increment is 
assumed to be one. If STEP is negative. 
the final value of the counter is set to be 
less than the initial value. The counter is 
decremented each time through the loop, 
and the loop is executed until the counter 
is less than the final value. 


° 


The body of the loop is skipped if the 
initial value of the loop times the sign of 
the step exceeds the final value times the 
sign of the step. 


NESTED LOOPS 


EXAMPLE 1 
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° 


10 


FOR...NEXT loops may be nested; that is, 
a FOR...NEXT loop may be placed within 
another FOR...NEXT loop. 


When loops are nested, each loop must 
have a unique variable name as its counter. 


The NEXT statement for the inside loop 
must appear before that for the outside 


loop. 


If nested loops have the same end point, a 
single NEXT statement may be used for all 
of them. 


The variable(s) in the NEXT statement may 
be omitted, causing the NEXT statement to 
match the most recent FOR statement. 


If a NEXT statement is encountered before 
its corresponding FOR statement, a "NEXT 
without FOR" error message is issued and 
execution terminates. 


K=10 


20 FOR X=1 TO K STEP 2 
30 PRINT X; 

40 K=K+10 

50 PRINT K 

60 NEXT 

RUN 


1 
3 


20 
30 


EXAMPLE 2 
10 J=0 
20 FOR X=1 TO J 
30 PRINT X 
40 NEXT X 


the loop does not execute 


In this example, 1 value of the loop excedes 


because the initial 
the final value. 


EXAMPLE 3 
10 X=5 
20 FOR X=1 TO X+5 
30 PRINT X; 
40 NEXT 
RUN 

12345678910 

Ok 


In this example, the loop executes , ten 
times. The final value for the loop variable 


is always set before the initial values are set. 


GET 


To read a record from a random disk file or RAM 
PACK into a random buffer. After a GET statement, 
INPUT# and LINE INPUT# may be performed to read 
characters from the random file buffer. 


FORMAT GET [#}<file number>[,<record number>] 


VERSIONS T-BASIC, T-DISK BASIC 
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REMARKS 0 <file number> is the number under which 
the file was OPENed. 


If <reecord number> is omitted, the next 
record (after the last GET) is read into 
the buffer. 


o The largest possible record number is 32767. 


EXAMPLE See Appendix A. 


NOTE: After a GET statement, INPUT# and LINE 
INPUT# may be done to read characters from 
the random file buffer. 


GET@ 


Transfers the sereen image bounded by a rectangle 
specified with two coordinates into the array named 
in this command. SCREEN 1 or SCREEN 2 must be 
executed prior to using GET@. 


FORMAT GET [@XX1,Y1}(STEPKX2,Y2),<array name> 
where X1, Y1, X2 and Y2 are integers 


VERSIONS T-DISK BASIC 


REMARKS o@ _is an optional identifier _ that 
distinguishes this from other GET 
statements. 


o The next two arguments define two 
coordinates that specify two diagonal 
vertices of a rectangle: the second 
coordinate can be given in one of two 
forms: 

STEP(X2,Y2) 
(X2,Y2) .... 


. relative address 
absolute address 
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o The last argument, an array est es dain 
DIM statement, specifies a spac Be 
the screen image. Arrays 
dimensioned as follows: a etas 
low-resolution 4+ n/ ie 
high-resolution 4 + n/8 by 

e number of dots within the 


where=njis) th CREEN command for 


rectangles. (See the Si 
a definition of "dots.") 


stored into arrays by GET@ can be 


NOTE Image: ereen again by the PUT@ 


displayed on the si 
statement. 


EXAMPLE 10 SCREEN 1 
20 CLS 
30 DIM A(20),B(37) 
40 LINE(10,40)-(20,45),6,B 
50 LINE(20,30)-(25,35),4,BF 
60 GET@(10,40)-(20,45),B 
70 GET@(20,30)-(25, 35), 
80 FOR I=0 TO 50 
90 PUT@(I,20),A,PSET 
100 PUT@(I,40),B,XOR 
110 NEXT I 


GOSUB...RETURN 


H 
| Allows branching to, and returning from, a subroutine. 
| 


| FORMAT GOSUB <line number> 


| RETURN 
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VERSIONS 


REMARKS 


EXAMPLE 
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T-BASIC, T-DISK BASIC 


0 <line number> is the first line of the 
subroutine. 


o A subroutine may be called any number of 
times in a program. 


o A subroutine may be called from within 
another subroutine. Such nesting of 
subroutines is limited only by available 
memory. 


o The RETURN statement(s) in a subroutine 
causes T-BASIC to branch back to the 
statement folowing the most recent GOSUB 
statement. 


o A subroutine may contain more than one 
RETURN statement if different return 
points are required. 


© Subroutines may appear anywhere in the 
program, but it is recommended that the 
subroutine be readily distinguishable from 
the main program. (To prevent inadvertant 
entry into the subroutine, it may be 
preceded by a STOP, END, or GOTO 
statement that direets program control 
around the subroutine.) 


10 GOSUB 40 

20 PRINT "BACK FROM SUBROUTINE" 
30 END 

40 PRINT "SUBROUTINE" 

50 PRINT " IN"; 

60 PRINT " PROGRESS" 

70 RETURN 

RUN 

SUBROUTINE IN PROGRESS 

BACK FROM SUBROUTINE 


GOTO 


al branching out of the normal 


Allows unconditioni ified line number. 


program sequence to a spec’ 


FORMAT GOTO <line number> 
VERSIONS T-BASIC, T-DISK BASIC 


i ber> is an executable 
eae P aeenentl That statement _and those 
following are executed. If <line number> 
is a nonexecutable statement, execution 
proceeds at the first executable statement 
encountered after <line number>. 


EXAMPLE LIST 
10 READ R 
20 PRINT "R="5R, 
30 A = 3.14*R°2 
40 PRINT "AREA =";A 
50 GOTO 10 
60 DATA 5,7,12 


AREA =78.5 

AREA 453.86 
R= 12 AREA 452.16 
20ut of data in 10 


Ok 
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IF... THEN[...ELSE] and IF...GOTO 


Controls program flow based on the result returned 
by an expression. 


FORMAT IF <expression> THEN <statement(s)> | 
<line number> 


[ELSE <statement(s)> | <line number>] 
FORMAT IP <expression> GOTO <line number> 

[ELSE<statement(s)> | <line number>] 
VERSIONS T-BASIC, T-DISK BASIC 


REMARKS o If the result of <expression> is not zero, 
the THEN or GOTO clause is executed. 


o THEN may be followed by either a line 
number for branching or one or more 
statements to be executed. 


o GOTO is always follwed by a line number. 


| o If the result of <expression> is zero, the 
THEN or GOTO clause is ignored and the 
ELSE clause, if present, is executed. 
Execution then continues with the next 
executable statement. 


NESTING OF IF STATEMENTS 


o IF...THEN...ELSE statements may be 
| nested. Nesting is limited only by the 


J length of the line. For example IF X>Y 


oe 


n 


4 
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"GREATER" ELSE IF Y>X 
THEN PRINT "LESS THAN" ELSE PRINT 


"EQUAL" is a legal statement. 


nt does not contain the same 
Aaa erEeESE and THEN clauses, each 
ELSE is matched with the closest 
unmatched THEN. For example IF A=B 
THEN IF B=C THEN PRINT "A=C' A ELSE 
PRINT "A<>C" will not print "A<>C" when 
AOB. 


If an IF...THEN statement is followed by a 
line number in the direct mode, an 
"Undefined line" error results unless a 
statement with the specified line number 
was previously entered in the indirect mode. 


° 


NOTE When using IF to test equality for a value that 
is the result of a floating point computation, 
remember that the internal representation of the 
value may not be exact. Therefore, the test 
should be against the range over which the 
accuracy of the value may vary. For example, 
to test a computed variable A against the value 
1.0, use: 


IF ABS (A-1.0)<1.0E-6 THEN ... 


This test returns true if the value of A is 1.0 
with a relative error of less than 1.0E-6. 


EXAMPLE 1 200 IF A THEN GET #1,A 


This statement GETs record number 1 if A is 
not zero. 
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EXAMPLE 2 
100 IF(A<20)*(A>10) THEN DB=1979-A:GOTO 300 
110 PRINT "OUT OF RANGE" 


In this example, a test determines if A is 
greater than 10 and less than 20. If A is in 
this range, DB is calculated and execution 
branches to line 300. If A is not in this range, 
execution continues with line 110. 


EXAMPLE 3 
210 IF IOFLAG THEN PRINT A$ ELSE LPRINT 
A$ 


This statement causes printed output to go 
either to the terminal or the line printer, 
depending on the value of a variable (IOFLAG), 
If IOFLAG is zero, output goes to the line 
printer, otherwise output goes to the terminal. 


INIT 


Initializes the RS-232C communication interface ports 
and reserves input buffers. INIT must be executed 
prior to any communication statements. 


FORMAT INIT <channel> [,<speed>[,<mode>]] 

VERSIONS T-DISK BASIC 

REMARKS 0 <channel> is one of following. 
hae for built-in RS-232C 


a aes for extended RS-232C interface 
port © 
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selected 8S: 
75 110,150,300 or 600 baud. 


o <speed> can 
: 00,1200,2400,4800, or 9600 


channel 
channel ~4: 
baud. 


© Initial setting is 300 for channel -3 and 
9600 for channel -4. 


© Default is previous setting. 


yy the three-character 


i tes, having 
ing enclosed with double quotes, t 
sneafollowing format: "<parity code><bits 
per character><stop bit code>’ 


© <mode> is specified b: 


o <parity code> — 
O for odd parity 
E for even parity 
N for no parity 3 , 
Initial eth is E. Default is previous 
setting. 


o <bits per character> 
5 5 bits per character 
6 6 bits per character 
7 17 bits per character 
8 8 bits per character 
Initial setting is 8 and default is previous 
setting. 


© <stop bit> 
0 1 stop bit 
1 1.5 stop bit 
2 2 stop bits 
Initial setting is 0 and default is previous 
setting. F 


The size of input communication buffer is 63 
bytes including carriage-return and line-feed. 


EXAMPLE INIT -4,9600,"N82" 
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INPUT 


Permits BASIC to accept input from the terminal 
during program execution. 


FORMAT 
VERSIONS 
REMARKS 
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INPUT[;] [<"prompt string">;]<list of variables> 
T-BASIC, T-DISK BASIC 


© When an INPUT statement is encountered, 
program execution pauses and a question 
mark is printed to indicate the program is 
waiting for data, 


o If <"prompt string"> is included, the string 
is printed before the question mark. The 
required data may then be entered at the 
terminal. 


o A comma may be used instead of a 
semicolon after the prompt string to 
Suppress the question mark. For example, 
the statement INPUT "ENTER © 
BIRTHDATE",B$ will print the prompt with 
no question mark, f 


olf INPUT is immediately followed by a 
semicolon, then the carriage return typed — 
by the user to input data does not echo a 
carriage return/line feed sequence. 


© The data that is entered is assigned to the 
variable(s) given in <variable list>. The 
number of data items supplied must be the 
same as the number of variables in the 
list. Data items are separated by commas. 


i be 

in the list may | 
i names in ey aii 
: et eect variable ea nang 
mabeceiptes variables). The ay eas east 
ana ie eee inptthe. varisble name. 
(strings specified PINPUT statement need 


eae i arks.) 
Se eeeeurrounlted by quotation mi 


jth too many or too 

ing to INPUT with : 

: esl or with the wrong ees 

a h as numeric instead ane) 
bee Si n?Redo from start! 


causes the message — Dee SUR AIN. 
inted. No assignmen’ a 
5 aa until an acceptable response is 


given. 
INPUT 
EXAMPLES TUR 
y n 
2 PRINT X "SQUARED IS" X°2 
30 END 


as (The 5 was typed in by the user in 


response to the question mark.) 
5 SQUARED IS 25 
Ok 


LIST 
PI=3.14 
0 INPUT "WHAT IS THE RADIUS";R 
A=PI*R*2 
iy PRINT "THE AREA OF THE CIRCLE IS";A 
50 PRINT 
60 GOTO 20 
Ok 
RUN 
WHAT IS THE RADIUS? 7.4 (User types 7.4) 
THE AREA OF THE CIRCLE IS 171.946 


WHAT IS THE RADIUS? 
ete. 
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INPUT# 


Reads data items from a sequential disk file, or 
RAM PACK file, and assigns them to program 
variables. Unlike INPUT, with INPUT#, no question 
mark is printed. 


FORMAT INPUT#<file number>,<variable list> 
VERSIONS T-BASIC, T-DISK BASIC 


REMARKS 0 <file number> is the number used when the 


file was OPENed for input. 


© <variable list> contains the variable names 
that will be assigned to the items in the 
file. (The variable type must match the 
type specified by the variable name.) 


© The data items in the file should appear 
just as they would if data were being 
typed in response to an INPUT statement. 


o With numeric values, leading spaces, 
carriage returns. and line feeds are 
ignored. The first character encountered 
that is not a space, carriage return or line 
feed is assumed to be the start of a 
number, The number terminates on a 
space, carriage return, line feed or comma. 


o If T-BASIC is Seanning the sequential data 
file for a string item, leading spaces, 
carriage returns and line feeds are also 
ignored. The first character encountered 
that is not a space, 
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H i sumed to 
carriage return, oF line feed is asst 
be the start of a string item. 


o If this first character el aonsist of all 


i wi ; 
("), the string item een the first 
characters read Persecont Thus, a 


quotation mark and 
quoted string may not 
mark as a character. 


t contain & quotation 


o If the first character of the string ze iit 
a quotation mark, the Sune ae 
unquoted string, and will Cer ge 
comma, carriage or line feed (or after 


characters have been read). 


reached when a numeric 


o If end of file is bcing INPUT, the item 1 


or string item is 
terminated. 


EXAMPLE See Appendix A. 


INPUT#n 


Reads data items from a designated device and 
assigns them to program variables. 


FORMAT INPUT#n,<variable list> 
VERSIONS T-BASIC, T-DISK BASIC 


REMARKS 0 n is an integer that designates a device: 
0 keyboard 
-1 cassette 
-3 built-in RS-232C 
-4 extended RS-232C interface port 
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© <variable list> is same as for INPUT#. 


NOTE No OPEN statement is required with INPUT#n. 


EXAMPLE 10 Ag=" 
20 INPUT#-1,A$ 
30 PRINT A$ 
RUN 
123 ASD 
Ok 


=o. a 


Assigns a string of up to 15 characters to the 
funetion key specified, 


FORMAT KEY <funetion key number>,<string 
expression> 


VERSIONS ‘T-BASIC, T-DISK BASIC 


REMARKS 0 <function key number> is an integer from 
1 to 8 corresponding to function keys PF1 
to PF8. 


<string expession> must be a string of no 
more than 15 characters. When a function 
key is assigned, the INKEY$ function 
returns one character of the key string 
per invocation, and returns successive 
characters on successive invocations. For 
example: 


IF KEY1,"DOG" 

THEN INKEY$ returns "D" the first time 
the function key is pressed. The second 
time the function key is 
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EXAMPLE 
no" and the third KEY LIST 


1 FILES m 
pressed, Keys retums 2 LOAD" 
time it returns ae 3 SAVE" 
4 netion keys 4 ?TIME: 
° A ee Bis oe 
ws: 
PFL. FILES(C/R ? ier 
LOAD " 
PF2 me 8 RUNm 
PES SAVE ° 
PFA 2TIMES(C/R) 
PES EDIT.(C/R) 
at ee KEY ON and KEY OFF 
PFS RUN(C/R) 


L-key will display @ list 
the bottom of | Displays the function key values at the bottom line 
I of the display screen or erases the display. 


Pressing the LABE 
of these key assignments at 
the screen. 


sss... eee 


i i trol ke; 
CHR$ function to assign contr y FORMAT KEY ON 


NOTE Use the 


code. KEY OFF 
EXAMPLE Fas 1,"INPUT" — § VERSIONS T-BASIC, T-DISK BASIC 
4 - ) 
meY 2,nPRINY } REMARKS 0 KEY ON displays function key vaules at 
the bottom line of the screen. 
KEY LIST o KEY OFF erases the function key values. 
Displays all 8 function key values on the screen. | © Pressing the LABEL key also erases them. 
HORMATig 4: KEY DISD ___KEY(n) ON, KEY(n) OFF and KEY(n) STOP 
VERSIONS _T-BASIC, T-DISK BASIC 
REMARKS 0 All 15 possible characters of each key are plows ate user to enable, disable or suspend 
displayed. up! 


o The "m" in the example below indicates a - - y FORMAT 


carriage return generated by the system. KEY(n)ON 


KEY(n)OFF 
KEY(n)STOP 
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VERSIONS T-BASIC, T-DISK BASIC 
VERSIONS T-DISK BASIC 
: fromtaietar Ee ie REMARKS o KILL statement given for a file that is 
st hee ; ton es 5 currently OPEN, causes a "File already 
hae open" error. 
it i ts. 
function key interrup' 
© KEY(n) ON enables fe re cto | 
fuel an ke designated r program files, anda cl files va 
o Every tne a the program line designated | Poaceae 
jump occul 
B. 
by ON KEY GoOsuU 


EXAMPLE 200 KILL "DATA1" 


© KEY(n) OFF disables interrupts: 


See Appendix A. 
i ts for that 
TOP suspends interrupts © 
° REN key until the execution of 
KEY(n) ON. LET 
ue ; ings are OFF. 
© Initial function key setting: Assigns the value of an expression to a variable. 
EXAMPLE 10 ON KEY GOSUB 100 
a KEY On FORMAT [LET] <variable>=<expression> 
100 PRINT "PFI" | VERSIONS T-BASIC, T- 
110 KEY(1) OFF BASIC, T-DISK BASIC 
RUN t REMARKS 0 Notice the word LET is optional: the 
PF1 equal sign is sufficient when assigning an 
Ok expression to a variable name. 
EXAMPLE 110 LET D=12 
120 LET E=12°2 
KILL 130 LET F=12~4 
140 LET =| +) 
Deletes a file from disk or RAM PACK. “ pn! 
FORMAT KILL "<filename>" * 
or 
PAD8111-1 
PAD8111-1 -90- | 


PLNAGAT 


120 
130 F=12°4 
140 SUM=D+E+F 


LINE 


SCREEN 1 or SCREEN 


i rectangle. . i 
Draws a line or @ [4 he execution of this 


2 must be executed prior to t 
statement. 


FORMAT LINE(@] (ISTEPXX1,Y1)HSTEPKX2, ¥2) 
{,{<color number>] [,<string>] 
where X1, Y1, X2 and Y2 are integers 


VERSIONS T-BASIC, T-DISK BASIC 


REMARKS 0 @ distinguishes this from other line 
commands, but has no further meaning. 


© The consecutive arguments: 
(ISTEPKX1,Y1)HSTEPKX2,Y2) designate the 
start and end points of a line, or two 
vertices of a rectangle, in the form of 
coordinate (X,Y). 


o When the first coordinate is not specified, 
the current position (the point most 
recently referenced) is used. The 
coordinates are given in one of two 


forms: 

() STEP(X,Y) 

(2) (X,Y) 
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The first form moves the graphics pointer 
in a step relative to its current position. 
The second form moves the graphics 
pointer with an absolute address. 


© <color number> specifies a drawing color. 
Color numbers are in the range 0 to 7. 
(See COLOR function.) 


© <string> is necessary only for drawing a 
rectangle. <string> is either "B" for box 
or "BE" for box filled with a color. 


When out-of-range coordinates are used, the 
system uses the closest legal values: negative 
values become 3020; X or Y values that 
exceed maximum value are adjusted to the 
maximum value. 


EXAMPLE 10 SCREEN 1 


20 WIDTH 80 
30 CLS 

40 LINE (10,10)-(10,40),7 
50 LINE (15,20)-(25,20),6 
60 LINE ~(18,50),3 

70 LINE (30,20)-(20,60),4,B 
80 LINE (10,10)-(40,10) 

90 LINE (60,50)-(50,80),2,BF 


LINE INPUT. 


Inputs 
string 


an entire line (up to 254 characters) to a | 
variable, without the use of delimters. 


FORMAT 
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LINE INPUT{;] [<"prompt string">;]<string 
variable> 


SS, 


VERSIONS 
REMARKS 


EXAMPLE 
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7T-BASIC, T-DISK BASIC 
i ing literal that 
t string is & string r 
- suioineel at the terminal before input is 
accepted. 


o A question mark is not printed unless it is 


part of the prompt string. 


the end of the prompt to 


© All input from se 4s assigned to <string 


the carriage re 
variable>. 


line feed/carriage return sequence is 

i naettntareel (in this order only), both 

characters are echoed—but the carriage 

return is ignored, the line feed is put into 
<variable>, and data input continues. 


o If LINE INPUT is followed immediately by 
‘a semicolon, then the carriage return 
typed by the user to end the input line 
does not echo a carriage return/line feed 
sequence at the terminal. 


o To escape from LINE INPUT, press the 
BREAK key, or Control-C. T-BASIC will 
return to command level and type Ok. 
Typing CONT resumes execution at the 
LINE INPUT. 


See example of LINE INPUT#. 


LINE INPUT# 


Reads an entire line (up to 254 characters), without 
delimiters, from a sequential disk file, or RAM PACK 
file, to a string variable. 


FORMAT 
VERSIONS 
REMARKS 


EXAMPLE 
10 
20 
30 
40 
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LINE INPUT#<file number>,<string variable> 
T-BASIC, T-DISK BASIC 


© <file number> is the number under which 
the file was OPENed. 


o <string variable> is the variable name to 
which the line will be assigned. 


o LINE INPUT# reads all characters in the 
sequential file up to a carriage return. It 
then skips over the carriage return/line 
feed sequence, and the next LINE INPUT# 
reads all characters up to the next 
carriage return. 


olf a line feed/carriage return sequence is 
encountered, it is preserved. 


o LINE INPUT# is especially useful if each 
line of a data file has been broken into 
fields, or if a T-BASIC program saved in 
ASCII mode is being read as data by 
another program. 


LINE INPUT "NAME ";A$ 
LINE INPUT "ZIP ";B$ 

LINE INPUT "PHONE ";C$ 
PRINT A$;""_";C$;""_ "BS 


RUN 


NAME BOB SMITH 


ZIP 


12345 


PHONE 213 456 ot 00 12345 


BOB SMITH 213 45 


Reads an 
delimiters, 
variable. 

INPUT#N. 


LINE INPUT#N 


ters), without 
i i to 254 charac , 0 
atch "ee daigntet device to baie 
We OPER statement is required wi 


SNSINEUTYE, py 2s Sa ee 


FORMAT LINE INPUT#n,<string variable> 


VERSIONS T-BASIC, T-DISK BASIC 


REMARKS 


EXAMPLE 
10 
20 
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on is an integer that designates a device: 


0 keyboard 

-1 cassette we 

- built-in RS- i 

a extended RS-232C interface port 


o <string variable> is the same as for LINE 
INPUT# 


LINE INPUT#-1,A$ 
PRINT A$ 


=96= 


LIST 


Lists on the display all, or part, of the program 
currently in memory. 


FORMAT 
VERSIONS 
REMARKS 


EXAMPLE 
LIST 150- 
LIST -1000 


LIST 150-1000 
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LIST [<line number>[-{<line number>]]) 
T-BASIC, T-DISK BASIC 


© T-BASIC always returns to command level 
after a LIST is executed. 


List offers three options: 


0 If only the first number is Specified, that 
line and all higher-numbered lines are 
listed. 


© If only the second number is Specified, all 
lines from the beginning of the program 
through that line are listed, 


. 
o If both numbers are specified,. the entire 
range is listed. 


Lists all lines from 150 to the end. 


Lists all lines from the lowest 
number through 1000. 


Lists lines 150 through 1000, inclusive. 


LLIST 


the program 
Lists on the line printer all, oF part, of prog! 
currently in memory. 


FORMAT LIST [<line number>{-I<line number> II] 


VERSIONS T-BASIC, T-DISK BASIC 


REMARKS T-BASIC always returns to command level 
after an LLIST is executed. 


o The options for LLIST are the same as for 


LIST. 


EXAMPLE See the examples for LIST. 


LOAD 


Loads a program into main memory from disk or RAM 
pack 2. 


FORMAT LOAD "<filename>"[,R] 
VERSIONS T-BASIC, T-DISK BASIC 


REMARKS o <drive number> must be an integer in the 
range of 1 to 5. 


o When R is not specified the existing 
program in main memory is erased and all 
opened files are closed prior to loading 
the program designated by LOAD. 
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o When R is specified, the existing program 
is erased but all opened files remain as 
they were and the program designated by 
LOAD is loaded and executed. 


EXAMPLE 


A=1 
S=2 
D=3 


PRINT A;S;D 
SAVE "1:TESTPR" 


LOAD "1:TESTPR" 


LOAD "1:TESTPR",R 
123 
Ok 


LOCATE 


Locates the cursor at column X of line Y on the | 
CRT screen. 


FORMAT LOCATE X,Y [,<switch>] 
where X and Y are integers and <switch> is 
Oorl 


VERSIONS T-BASIC, T-DISK BASIC 


REMARKS o X and Y must be integer values in the 
range 0 to 79 and 0 to 24 respectively. 


o X and Y must also be values within the 
range defined by WIDTH. 
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off: 1 for 
© <switeh> turns the cursor Kd by 
on (visible) or 0 for off (no! 
© Default keeps visibility unchanged. 


EXAMPLE 
200 LOCATE 15,4 
210 INPUT "NAME..",A$ 
RUN 
NAME..T100 


Ok 


LPRINT and LPRINT USING 


Prints data on the line printer. 


FORMAT —_LPRINT [<list of expressions>] 


LPRINT USING <string  exp>;<list of 
expressions> 


VERSIONS T-BASIC, T-DISK BASIC 
REMARKS o Same as PRINT and PRINT USING, except 


output goes to the line printer.. (See 
PRINT and PRINT USING.) 


LSET and RSET 


Moves data from memory to a random file buffer (in 
preparation for a PUT statement). 


FORMAT LSET <string variable> = <string expression> 
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Sa 


RSET <string variable> = <string expression> 
VERSIONS T-BASIC, T-DISK BASIC 


REMARKS If <string expression> requires fewer bytes 
than were FIELDed to <string variable>, 
LSET left-justifies the string in the field, 
and RSET  right-justifies the string. 
(Spaces are used to pad the extra 
positions.) 


olf the string is too long for the field, 
characters are dropped from the right, 


© Numeric values must be converted to 
| strings before they are LSET or RSET. 


|0 See the MKI$, MKS$, MKD$ functions. 


EXAMPLE 150 LSET A$=MKS$(AMT) 
160 LSET D$=DESC$ 


See Appendix A. 


LSET or RSET may also be used with a 
non-fielded string variable to left-justify or 
right-justify a string in a given field. 


For example, the program lines 
110 A$=SPACE$(20) 
120 RSET A$=N$ 


right-justify the string N$ in a 20-character 


field. This can be very handy for formatting 
printed output. 
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MERGE 7 
Merges a specified disk file, or RAM pack 2 file, 
into the program currently in memory. 
FORMAT MERGE “<filename>" 
VERSIONS T-BASIC, T-DISK BASIC 
REMARKS <filename> is the name used when the file 


was SAVEd. 


been SAVEd in ASCII 


o The file must have "Bad file mode" error 


format. If not, & 
occurs. 


© If any lines in the disk or RAM PACK file 
have the same line numbers as lines in the 
program in memory, those lines will 
replace the corresponding lines in 
memory. (MERGEing may be thought of as 
"inserting" new program lines into the 
program in memory.) 


© T-BASIC always returns to command level 
after executing a MERGE command. 


EXAMPLE MERGE "NUMBRS" 


MID$ 


Replaces a portion of one string with another string. 


FORMAT 
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MID$(<string expressionl>,n[,m])=<string 
expression2> 


VERSIONS 
REMARKS 


EXAMPLE 


where n and m are integer expressions and 
<string expressionl> and <string 
expression2> are string variables. 
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o The characters in <string expressionl>, 
beginning at position n, are replaced by 
the characters in <string expression2>, 


o The optional m refers to the number of 
characters from <string expression2> that 
will be used in the replacement. If m is 
omitted, all of <string expression2> is used. 


o Regardless of whether m is omitted or 
included, the replacement of characters 
never goes beyond the original length of 
<string expression]>. 


10 A$="KANSAS CITY, MO" 
20 MID$(A$,14)="KS" 

30 PRINT A$ 

RUN 

KANSAS CITY, KS 


MID$ is also a function that returns a substring 
of a given string. 


MOTOR 


Turns the cassette motor on or off, 


FORMAT 
VERSIONS 
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MOTOR <state> 
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indicating on or 
REMARKS o <state> is a Boolean value ince i. Le - 
off: If <state> > Ws mo! 
<state> = 0, motor is of! 
tte motor 
i jtted, the casse’ t 
‘ ete Eee the state reverses with 
each execution of this statement. 


EXAMPLE MOTOR 1 
MOTOR 0 


Oe 
A nwt SHAE 


Changes the name of a disk file or RAM PACK file. 


FORMAT NAME "<old filename>" AS "<new filename>" 


VERSIONS ‘T-BASIC, T-DISK BASIC 


REMARKS o <old filename> must exist and <new 
filename> must not exist; otherwise an 
error will result. 


o After a NAME command, the file exists on 
the same disk, in the same area of disk 
space, with the new name. 


EXAMPLE 
Ok 

NAME "ACCTS" AS "LEDGER" 

Ok 


In this example, the file that was formerly 
named ACCTS will now be named LEDGER. 


NEW 


Deletes 


all variables. 


the program currently in memory and clears 


FORMAT 
VERSIONS 
REMARKS 


NEW 
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© NEW is entered at command level to clear 
memory before entering a new program. 


© T-BASIC always returns to command level 
after NEW is executed. 


ON COM GOSUB 


Sets up 


input from the RS-232C interface ports. 


Subroutine entries which are used to process 


FORMAT 


VERSIONS 


REMARKS 0 This statement sets up subroutine entries. 


o The first <line number> is used for 


©The second <line number> is for the 


ON COM GOSUB [<line number>] [,<line 
number>] 


T-DISK BASIC 


When an interrupt occurs control transfers 
to one of the subroutines. 


interrupts on the built-in RS-232C port. 


extended RS-232C interface port. 
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i this statement an 

execution of . 

3 Meri causes control to transfer to the 

designated subroutine. 
i Jasts until a 
ion of the routine 

; RETURN statement 1S encountered, | tet 
the control transfers to vee 
following the interrupted state . 


o All interrupts detected duritig executions fy 
designated subroutine al held 
ee tral eetiths from that subroutine; then 


the interrupts are processed. 

inhibit those interrupts during 
if outine with a COM 
beginning of the 


o You may 
execution of the subr 
statement at the 
subroutine. 


o Even though interrupts are inhibited at a 
given port, any interrupts from other ports 
will be processed in the manner described 
above. 


NOTE After an interrupt transfers control to them, 
most input subroutines are designed to loop 
within themselves until an entire message is 
read into the input buffer. Character by 
character input processing may cause an "Input 
buffer full" error if processing speed is too slow 
to empty the buffer faster than it fills. 


EXAMPLE 
10 ON COM GOSUB 100 
20 COM(-3) ON 
} 30 INIT -3,300,"E81" 
40 GOTO 40 


PAD8111-1 -106- 


100 IF PORT(-3)=0 RETURN 
110 PRINT INPUTS$(1,#-3) 
120 GOTO 100 


ON ERROR GOTO 


Enables error trapping and specifies the first line of 
the error handling subroutine. 


FORMAT ON ERROR GOTO <line number> 
VERSIONS T-BASIC, T-DISK BASIC 


REMARKS o Once error trapping has been enabled, all 
errors detected, including direct mode 
errors (e.g., syntax errors), will cause a 
jump to the specified error handling 
subroutine. 


o If <line number> does not exist, an 
"Undefined line" error results. 


o To disable error trapping, execute an ON 
ERROR GOTO 0. | Subsequent errors will | 
print an error message and halt execution. 


o An ON ERROR GOTO 0 statement that 
appears in an error trapping subroutine 
causes T-BASIC to stop and print the 
error message for the error that caused 
the trap. 


o It is recommended that all error trapping 
subroutines execute an ON EROR GOTO 0 | 
if an error is encountered for which there | 
is no recovery action. | 


Eel 


PAD8111-1 oh 


i ion of an 
o If an error occurs during SE ASIC itor 
error handling subroutine, t ¥ eecnition 
mere o aT ra yes not occur 
terminates. Error trapping patie’ 
within the error handling subr' 


NOTE 


EXAMPLE 10 ON ERROR GOTO 1000 


—= ON...GOSUB_and_ON...GOTO 


e of several specified line 


i on 
AE Oren he value returned when an 


numbers, depending on tl 
expression is evaluated. 


ON <expression> GOTO <list of line numbers> 


AT s ‘ 
ee ON <expression> GOSUB <list of line numbers> 
VERSIONS T-BASIC, T-DISK BASIC 

o The value of <expression> determines the 


REMARKS ‘ r 
line number in the list which will be used 


for branching. For example, if the value 

is three, the third line number in the list 

will be the destination of the branch. (If 

the value is a non-integer, the fractional 
portion is rounded.) 


o In the ON...GOSUB statement, each line 
number in the list must be the first line 
number of a subroutine. 


olf the value of <expression> is zero, or 
greater than the number of items in the 
list (but less than or equal to 255), BASIC 
continues with the next 
statement. 


executable 
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o If the value of <expression> is negative, or 
greater than 255, an "Illegal function call" 
error occurs. 


EXAMPLE 100 ON L-1 GOTO 150,300,320,390 


ON KEY GOSUB 


Causes a branch to the designated line when a 
function key is pressed. 


FORMAT ON KEY GOSUB <line no-1>[,<line no-2>]... 

{,<line no-8>] 

VERSIONS T-DISK BASIC 
REMARKS 0 The line numbers correspond to function 
keys PF1 to PF8. 

° Pressing a function key interrupts program 
execution and causes a jump to the 
specified line. 

© When RETURN is detected, control returns 
to the interrupted program. 

° While the system processes a subroutine 
initiated by a function key interrupt, no 
further function key input is accepted. 

/ 

© When a zero is specified instead of a line 

number, no jump occurs. i 

i 

EXAMPLE | 
10 CLs 

20 ON KEY GOsuB 50,60,70 i 

30 KEY ON } 
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40 I=-RND*80:K=RND* 50:GOTO30 


fe N 
50 KEY STOP : CIRCLE oe ee 
60 KEY STOP : LINE-{I,2v?  2sRETURN 


70 KEY STOP : PAINT (K,40),3 


OPEN. 


Allows 1/0 to a disk file or RAM PACK file. 
oe ee ee 


FORMAT OPEN "<filename>" [FOR<mode>] AS [#] <file 
number> 


VERSIONS T-DISK BASIC 


i i it be 
© A disk file, or RAM PACK file, mus 
ees OPENed before any I/O operation can be 
performed on that file. 


© OPEN allocates a buffer for I/O to the 
file and determines the mode of access 
that will be used with the buffer. 


© <filename> is a string expression containing 
a device number and file name. 


o <mode> is a string expression with these 
possible values: 
OUTPUT specifies sequential output mode 
INPUT specifies sequential input mode 
APPEND specifies appending record to the 
file sequentially, Blank specifies random 
input/output mode 


© <file number> is an integer expression 
whose value is between one and fifteen. 
The value is then associated with the file 
for as long as it is OPEN and is 
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weed to refer other I/O statements to the 
ile. 


NOTE 


A file can be OPENed for sequential input or 
tandom access on more than one file number at 
a time. A file may be OPENed for output; 
however, with only one file number at a time. 


EXAMPLE 10 OPEN "L:INVEN" FOR INPUT AS 2 


See Appendix A. 


OPTION BASE 


Declares the minimum value for array subscripts, 


FORMAT OPTION BASE n 
where n is 1 or 0 


VERSIONS T-BASIC, T-DISK BASIC 


REMARKS 0 The default base is 0. If the statement 
OPTION BASE 1 is executed, the lowest 
value an array subscript may have is one, 


OUT 


Sends a byte to a machine output port. 


FORMAT OUT Id 


where I and J are integer expressions in the 
range 0 to 255 


PAD8111-1 


T-BASIC, T-DISK BASIC 


VERSIONS 
REMARKS 0 The integer expression I is the port number. 
o The integer expression J is the data to be 
transmitted. 
EXAMPLE 100 OUT 32,100 


PAINT 


with a selected color. SCREEN 1 or 


ks d prior to the execution 


SCREEN 2 must be execute: 
of this statement. 


PAINTISTEPKX,¥\,[<color number>] 


FORMAT 
[,<eolor number>]] 
VERSIONS T-BASIC, T-DISK BASIC 
REMARKS 0 The area to be painted is identified by 
picking an arbitrary coordinate pair within 
its area but not on its border. 
o Coordinates can be expressed in one of 
two forms: 
(1) STEP(X,Y) ... relative address 
(2) (X,Y) ... absolute address 
o In the first form STEP(X,Y), the 
distance is specified from the current 
position. 
° The second form (X,Y) specifies an 
absolute address, 
PAD8111-1 
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° (X,Y) must be in the range of (0,0) 
to. (639,199) depending on the 
resolution of the CRT. 


© The attribute <color number> designates a 
color to be used for the area color fill. 


o The attribute <color number> specifies the 
border color number. Default is the called 
back border color. 


© Both color numbers must be a digit from 0 
to 7 (see COLOR statement). 


NOTE If the border is not given, the entire screen 
will fill with a color. 
If the area designated to be filled does not 
have a closed border, the entire screen will be 
color filled except for the area's border. 
When color filling figures with "jagged edges", 
or very complicated patterns, the system may 
have an “out of memory" error. To recover, 
the stack area size must be expanded using the 
CLEAR statement. 

EXAMPLE 
10 SCREEN 1 
20 CLS 
30 CIRCLE(79,50),30,5 
40 CIRCLE(79,50),50,5 
50 PAINT(60,50),3,5 
60 PAINT(60,80),7,5 
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A Sal ae 2 ee 


ee 


Plays notes according 
is composed of "Music 


to the string expression which 
Macro Language" commands. 


FORMAT 
VERSIONS 
REMARKS 
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PLAY <string expression? 
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© There are seven types of MML commands: 


0 (1) 


© (2) 


A, B, C, D, E, F AND G commands 
have the following form: command 
[<semitone code>] 
<semitone code> is "#", "+" or "=", 
"g" and "+" indicate sharp. 
indicates flat. 
A through G correspond to A through 
G on the musie scale. 


non 


L <duration> designates the duration 
of a note. 


<duration> may range from 1 to 64. 
<duration> default is 4. (L4 is a 
quarter note, L1 is a whole note.) 


N <note> plays a note. 


<note> may range from 0 to 82. 
(See SOUND statement.) 

If Snote> is 0 , it indicates a rest. 
This command is independent of the 
© command discussed in (4) below. 
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(os 


o (4) O <octave> sets the current octave. 


° <octave> may range from 0 to 6. 
Default is 3 (434Hz, its "A'-code). 


P <pause> designates 
pause. 


length of a 


° <pause> may range from 1 to 64—but 
the actual duration of the pause is 

the reciprocal of <pause>. ; 
Default is 4. 


T <tempo> sets the number of L4!s 
per second as a tempo. 


o <tempo> may range from 32 to 255. 
Default is 120. 


o (7) X <string> executes a specified string. 


NOTE Numeric arguments can be constants or a 


variable name in the form of "=variable;" 


EXAMPLE 1 
PLAY 
"O3L20C #DD#EFF#GG#AA #BP20T34L50CDEFGAB" 


EXAMPLE 2 
10 A$="03EF" 
20 B$="XA$;DG" 
30 PLAY B$ 
RUN 


POKE 


Writes a byte into a memory location. 


FORMAT POKE I,J 


where I and J are integer expressions 
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VERSIONS 


REMARKS 


EXAMPLE 
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i 1 is the receiving 
0 Integer expression e to be written 


memory address for the byt 
by POKE. 


Integer expression J is the byte to be 


written by POKE. 


° 


o J must be in the range 0 to 255. 
o I must be in the range 32768 to 65536. 


o PEEK is the complementary function to 
POKE. The argument to PEEK is an 
address from which a byte is read. 


POKE and PEEK are useful for efficient 
data storage, loading assembly language 
subroutines, and passing arguments and 
results to and from assembly language 
subroutines. 


° 


10 POKE 33123, 125 


PRESET 


Displays a dot in color at a given screen coordinate. 
SCREEN 1 or SCREEN 2 must be executed prior to 
the execution of this statement. 


FORMAT 


VERSIONS 


REMARKS 
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PRESET [STEPKX,YY,<color number>] 
where X and Y are integers 


T-BASIC, T-DISK BASIC 
o The coordinate can be e: i 
two formats: Se an eo 


(1) STEP (X,Y) 
(2) (X,Y) 
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o STEP(X,Y) is an address relative to the 
last point referenced. 


o (X,Y) is an absolute address. 


BASIC allows coordinate values beyond the edge 
of the screen; however values outside the 
integer range (-32,768 to 32,767) cause an 
overflow error. 


The coordinate (0,0) is always the upper left 
corner of the screen. 


The point function allows reading a value from 
a point on the screen, If the point is out of 
range, the value -1 is returned. 


The argument <color number> specifies the dot 
color (see COLOR statement for color number 
values). 


Syntax for PRESET and PSET are identical, 
except that if no third parameter is given the 
background color is selected. 


EXAMPLE 


CLS:COLOR 7,1 
SCREEN 1 
LINE (18,27)-(23,32),7,B 
PRESET (20,30),6 
FOR X=1 TO 1000:NEXT X 
PRESET (21,30),2 
FOR X=1 TO 1000:NEXT X 
PRESET (20,30),0 
FOR X=1 TO 1000:NEXT X 
100 PRESET (20,30) 
110 PRESET (21,30) 
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PRINT 


Displays data on the screen. 


FORMAT 
VERSIONS 
REMARKS 
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PRINT [<list of expressions>] 
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° 


° 


° 


If <list of expressions> is omitted, @ blank 
line is printed. 


If <list of expressions> is included, the 
values of the expressions are printed on 
the screen. 


The expressions in the list may be numeric 
and/or string expressions. (Strings must be 
enclosed in quotation marks.) 


The position of each printed item is 
determined by the punctuation used to 
separate the items in the list. 


T-BASIC divides the line into print zones 
of 14 spaces each, 


In the list of expressions, a comma causes 
the next value to be printed at the 
beginning of the next zone. A semicolon 
causes the next value to be printed 
immediately after the last value. Typing 
one or more spaces between expressions 
has the same effect as typing a semicolon. 


If a comma or a semicolon terminates the 
list of expressions, the next PRINT 
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statement begins printing on the same line, 
spacing accordingly. 


If the list of expressions terminates 
without a comma or a _ semicolon, a 
carriage return is printed at the end of 
the line. 


If the printed line is longer than the 
SCREEN width, BASIC goes to the next 
physical line and continues printing. 


Printed numbers are always followed by a 
space. Positive numbers are preceded by 
a space. Negative numbers are preceded 
by a minus sign. 


Single precision numbers that can be 
represented with 6 or fewer digits in the 
unsealed format no less accurately than 
they can be represented in the scaled 
format, are output using the unscaled 
format. For example, 1E-7 is output as 
.0000001 and 1E-8 is output as IE-08. 


Double precision numbers that can be 
represented with 16 or fewer digits in 
the unsealed format no less accurately 
than they can be represented in the scaled 
format, are output using the unscaled 
format. For example, 1D-15 is output as 
.0000000000000001 and 1D-16 is output as 
1D-16. 


NOTE A question mark may be used in place of the 
word PRINT in a PRINT statement. 
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EXAMPLE 1 

10 X=5 

20 PRINT X+5, X= 
30 END 

RUN arts 
10 0 
Ok ’ 

In this example, 
statment cause each value t 
beginning of the print zone. 


5, X*-5) 


mas in the PRINT 
tits coats be printed at the 


EXAMPLE 2 
LIST 
20 a 2 "SQUARED Is" X72 "AND"; 
30 PRINT X "CUBED IS" X73 
40 PRINT 
50 GOTO 10 
Ok 


29 

9 SQUARED IS 81 AND 9 CUBED IS 729 

2 22 

22 SQUARED IS 484 AND 22 CUBED IS 10648 
2 


In this example, the semicolon at the end of 
line 20 causes both PRINT statements to be 
printed on the same line, and line 40 causes a 
blank line to be printed before the next prompt. 


EXAMPLE 3 
10 J=0:K=0 
15 FOR X=1TO5 
20 J=d+5 
30 K=K+10 
40 233K; 
50 NEXT X 
Ok 
RUN 
5 10 10 20 15 30 20 40 25 50 
Ok 
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In this example, the semicolons in the PRINT 
Statement cause each value to be printed 
immediately after the preceding value. (Don't 
forget, a number is always followed by a space 
and positive numbers are preceded by a space.) 


In line 40, a question mark is used instead of 
the word PRINT. 


PRINT USING 


Prints strings or numbers using a specified format. 
een SH Phan 78 lor i extoe ted apie ot tie tine 


FORMAT PRINT USING <string expressions> 
<list of expressions> 


VERSIONS T-BASIC, T-DISK BASIC 


REMARKS 0 <list of expressions> is comprised of the 
string expressions or numeric expressions 
that are to be printed, separated by 
semicolons. 


<string expressions> is a string literal (or 
variable) comprised of special 

formatting characters. These formatting 
characters (see below) determine the field 
and the format of the printed strings or 
numbers. 


String Fields — when PRINT USING is used 
to print strings, one of three formatting 
characters may be used to format the 
string field. 


specifies that only the first character in 
the given string is to be printed. 


PAD8111-1 


r aracters from the 

An spaces LY specifies that ae > pane If the 
string are ve typed with no spaces, two 

vig printed; one space 


and so on. 


backslashes are 
characters will be 
prints three characters, 


o If the string is longer than the field, the 
extra characters are ignored. 


If the field is longer than the string, the 


string wi ft-justified in the field and 
ill_be_left-jus' n : 
padded with spaces on the right. Example 


10 A$="LOOK":B$ 
20 PRINT USING "! 
30 PRINT USING "\ \";A$;B$ =a 
40 PRINT USING "\  \";A$;B$;"!! 


"&" specifies a variable length string field. 
When the field is specified with "&", the 
string is output exactly as input. Example: 


10 A$="LOOK":B$="0UT" 
20 PRINT USING "!";A$; 
30 PRINT USING " 
RUN 

LOUT 


© Numeric Fields: When PRINT USING is used 
to print numbers, the special characters 
listed below may be used to format the 
numeric field. 


# =A number sign represents each digit 
position. Digit positions are always 
filled, If the number to be printed has 
fewer digits than Positions specified, the 

i ‘ight-justi (preceded by 
spaces) in the field. 
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- A decimal point may be inserted at any 
position in the field. If the format string 
specifies that a digit is to precede the 
decimal point, the digit will always be 
printed (as 0 if necessary). Numbers are 
rounded as necessary. 

Examples: 
PRINT USING "##.##";.78 
0.78 
PRINT USING "###.##";987.654 
987.65 
PRINT USING "##.##";10.2,5,3,66.789,.234 
10.20 5.30 66.79 0.23 
In the last example, three spaces were 
inserted at the end of the format string to 
separate the printed values on the line. 


+ A plus sign at the beginning or end of the 
format string will cause the sign of the 
number (plus or minus) to be printed 
before or after the number. 


- A minus sign at the end of the format 
field will cause negative numbers to be 
printed with a trailing minus sign. 
Example: 

PRINT USING "+##.##";-68.95,2.3,55.6,-.9 
-68.95 +2.30 +55.60 -0.90 
PRINT USING "##.##=";-68.95,22.449,-7.01 
68.95- 22.45 7.01- 


** A double asterisk at the beginning of the 
format string causes leading spaces in the 
numeric field to be filled with asterisks. 
The ** also specifies positions for two 
more digits. Example: 

PRINT USING "**#.#  "512.39,-0.9,765.1 
*12.4 *-0.9 765.1 


$$ A double dollar sign 


**$ The **§ at the begil 
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causes @ dollar uk 
i e 

to be printed to the immediate pete atte 

formatted number. ‘The 7 Lan eet 

pate positions etal format cannot 
ign, The e 

Soameaerl $$. Negative. mee cannee 

be used unless the minus sign tral 

right. 

Example: 2 

PRINT USING nggy gd. # #5456. 78 

$456.78 

inning of @ format 


i ines the effects of the previous 
sr ee Leading spaces will be 
asterisk-filled and & dollar sign will 
printed before the number. ¥*$ specifies 
three more digit positions, one of which is 
the dollar sign. 

imple: 

PRINT USING "**$##. 4852.34 
##*$2.34 


A comma that is to the left of the 
decimal point in a formatting string causes 
‘a comma to be printed to the left of 
every third digit to the left of the 
decimal point. A comma that is at the 
end of the format string is printed as part 
of the string. A comma has no 
effect if used with the exponential (~~°*) 
format. 

Example: 

PRINT USING "####,.##51234.5 

1,234.50 

PRINT USING "####.##,"51234.5 

1234.50, 
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“=~ Four carets (or up-arrows) may be placed 


after the digit position characters to 
specify exponential format. The four 
earets allow space for E+txx to be 
printed. Any decimal point position may 
be specified. The significant digits are 
left-justified, and the exponent is 
adjusted. Unless a leading + or trailing + 
or - is specified, one digit position will be 
used to the left of the decimal point to 
print a space or a minus sign. | 
Examples: 

PRINT USING "##.##°°°°"5234.56 

2.35E+02 

PRINT USING ".####°°*°-";888888 
-8889E+06 

PRINT USING "+.##°°°7"53123 

+.12E+03 


An underscore in the format string causes 
the next character to be output as a 
literal character. 

Example: 

PRINT USING "_!##.##_ 1512.34 

112.34! 


The literal character itself may be an 
underscore by placing "_" in the format 
string. i 


If the number to be printed is larger than 
the specified numeric field, a percent sign | 
is printed in front of the number. If 
rounding causes the number to exceed the 
field, a percent sign will be printed in 
front of the rounded number. 

Example: 

PRINT USING "##.##"5111.22 

%111.22 

PRINT USING ".##";.999 

%1.00 


ds 
igi ecified exceed 
o If the number of digits ee error will 


nfilegal funetion 


24, an 
result. 
PRINT# and PRINT# USING 


i AM PACK 
Writes data to sequential disk file or R. 


i SING<string 
PRINT# <filenumber>,CU ‘s 
ae expression> ;klist of expressions? 


VERSIONS _T-BASIC, T-DISK BASIC. 


i the 
REMARKS 0 <file number> is the number used when 


file was OPENed for output. 


is comprised of 


i ssion> S 0 
i (as described in 


formatting characters 
PRINT USING). 


i in <li ssions> are 
o The expressions in <list of expressit 
the numeric and/or string expressions that 
will be written to the file. 


NT# does not compress data in the 

‘ ae An image of the data is written to 
the file, just as it would be displayed on 
the SCREEN with a PRINT statement. For 
this reason, care should be taken to 
delimit the data in the file, so that it 
will be read back correctly from the file. 


oln <list of expressions>, numeric 


expressions should be delimited by 
semicolons. 
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Example: 

PRINT #1,A;B;B;X;Y;Z 

(If commas are used as delimiters, the 
extra blanks that are inserted between 
print fields are also written to the file.) 


© String expressions must be Separated by 
semicolons in the list. To format the 
string expressions correctly on the file, 
use explicit delimiters in the list of 
expressions. Example: 


Let A$="CAMERA" and B$="93604-1", 
Then, the statement: PRINT#1,A$;B$ 


would write CAMERA93604-1 to the file. 
Because there are no delimiters, this could 
not be input as two separate strings. To 
correct the problem, _ insert explicit 
delimiters into the PRINT# statement as 
follows: 

PRINT#1,A$;",";B$ 


The image written to file is 
CAMERA, 93604-1 


which can be read back into two string 
variables. 


o If the strings themselves contain commas, 
semicolons, significant leading blanks. 
earriage returns or line feeds, write then 
to file surrounded by explicit quotation 
marks using CHR$(34). 

For example, let A$="CAMERA, 
AUTOMATIC" 

and B$=" 93604-1. The statement 
PRINT#1, 
CHR#(34);A9CHRS(34);CHRS(34);B$ 
CHR$(34) | 


NNN 


g image to file: 


writes the followin 
ic" 93604-1 


"CAMERA, AUTOMATI 


ws tam IS a 
93604 to BS. 

othe ary stone, 8,05 ie 

eta te yarn x 2 

eae SORINT#, see Appendix A 


and WRITE#). 


ee 
iron _andee BH RINT Ee 


Writes data to a designated d 
cassette, line printer, built-in 


evice, including: CRT, 
RS-232C and extended 


RS-232C interface port. 


FORMAT 
VERSIONS 
REMARKS 


NOTE 
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PRINT#n,[<list of expressions>] 
T-BASIC, T-DISK BASIC 


o The integer n designates a device, as 
follows: 


0 CRT 

ik casssette 

-2 line printer 

-3 built-in RS-232C 

-4 extended RS-232C interface port 


© <list of expressions> is the same as for 
PRINT#- 


OPEN is not necessary with this statement. 
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EXAMPLE 


10 INPUT A$,B,C, 

20 IF A$="E" GOTO 50 
30 PRINT #-1 ,A$,B,C 

40 GOTO 10 

50 REM 

60 STOP 

70 INPUT #-1,S$,D,F 

80 IB S$="E" GOTO 100 
90 PRINT S$;D;F 

100 GOTO 70 

RUN 

2? TOSHIBA,123,45 

? T100,345,78 

? E,0,0 

Break in 60 


Displays a dot in color at a sg ecified s 
coordinate. SCREEN 1 or SCREEN 2 sits be 
executed prior to the execution of this statement. 


FORMAT 


VERSIONS 


REMARKS 
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PSET [STEPKX,YX,<color number>] 
where X and Y are integers 


T-BASIC, T-DISK BASIC 


© Coordinates are specified it 
poman ecified in one of two 
(1) STEP(X,Y) Relative 
(2) (X,Y) Absolute 
° The first form specifies a int 
relative to the most mati 
referenced coordinate. 


~129- DRG AS 


ifies an absolute : 
° The second form Boece j o The largest possible record number is 
sereen coordinate: ‘ | \ 32767. The smallest record number is 1. 
edge of the : : 
OTE Coordinate values beyond aie outside the - EXAMPLE — See Appendix A. 
A sereen are allowed | iB 32767) will cause an 


integer range (-32,76! NOTE PRINT#, PRINT# USING, and WRITE# may be 


re used to put characters in the random file buffer 
overflow  Sthe iways the upper left before a PUT statement. 
inate (0,0) is lw 
The ous Screen In the case of WRITE#, T-BASIC pads the 
corn er> indicates the buffer with spaces up to the carriage return. 
m 


i <color nui 
The third argument 
dot color selected from a rant 
COLOR statement). 


Any attempt to read or write past the end of 
see 
ge of 0 to ul the buffer causes a "Field overflow" error. 


EXAMPLE I 
10 CLS PUT. 
15 COLOR & ‘1 
4 Be Transfers an image stored in an array onto the 
: SET(21,30),2 SS sereen in a specified rectangular area. SCREEN 1 or 
40 P Say SCREEN 2 must be executed prior to execution of 
See . this statement. 


put 


FORMAT PUT@[STEPKX,Y),<array, name2[,<action 
Writes a record from a random buffer to a random verb>] where X and Y are integers 
disk file or RAM PACK file. 


VERSIONS T-DISK BASIC 


i <record number>] REMARKS  o (X,Y) designates a point at the top left | 
FORMAT PUT [#Kfile number?L, corner of a rectangle from which the | 
VERSIONS T-BASIC, T-DISK BASIC image is developed. 

i ii under which o <array name> designates a dimensioned 
ee eee vopiied Hy array containing the image. j 
xR | 

A * o If the size of the image is too large to fit 

If <record number> is omitted, the record 
:. will have the next available record number on the screen the "{llegal function call" 


(after the last PUT). ] error message is displayed. 
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i that can 
© “action verb> defines an See Piet 
be performed on the image ) 


i the 

and/or on the Se a 
reen. There are : 
PSET, PRESET, XOR, OR and AND. 


the image onto the 


° PSET transfers odification. 


sereen without any m 
rs the image onto the 
sereen after converting | t Lae 
negative image. Paci 
eorrespondencies for the c 

are as follows: 


OSITIVE COLOR NEGATIVE COLOR 


° PRESET transfe 


~~ 


EXAMPLE 


= 7 = WHITE i 

eee 6 = YELLOW 

2 = RED 5 = CYAN 

3 = MAGENTA 4 = GREEN 

4 = GREEN 3 = MAGENTA 

5 = CYAN 2 = RED 

6 = YELLOW 1 = BLUE 

7 = WHITE 0 = BLACK 

° XOR, OR and AND _ perform 
"exclusive OR," "logical OR" and 
"logical AND," respectively, for the 
color code information in the array 
and existing color code on the 
sereen. Then the resulting image is 
displayed. XOR has a_ unique 
property that allows an object to 
move around the screen without 
obliterating the background image. 

10 SCREEN 1 
20 CLS 


30 DIM A(20) 
40 LINE (10,40)-(20,45),6,B 
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x 


50 LINE (20,30)-(25,35),4,BF 
60 GET@ (20,30)-(25,35),A 
70 PUT@ (10,20),A,PSET 

80 PUT@ (10,40),A,XOR 


RANDOMIZE 


Reseeds the random number generator. 


FORMAT RANDOMIZE [<expression>] 


VERSIONS T-BASIC, T-DISK BASIC 


REMARKS olf <expression> is omitted, T-BASIC 
suspends program execution and asks for a 
value by printing Random Number 
Seed (-32768 to 32767)? before executing 
RANDOMIZE. 


olf the random number generator is not 

reseeded, the RND function returns the 
same sequence of random numbers each 
time the program is RUN. 


o To change the sequence of random numbers 
every time the program is RUN, place a 
RANDOMIZE statement at the beginning of 
the program and change the argument with 
each RUN. 


EXAMPLE 
10 RANDOMIZE 
20 FOR I=1 TO 5 
30 PRINT RND; 
40 NEXT I 
RUN 
Random Number Seed (-32768 to 32767)? 3 (user 
types 3) 
+88598 .484668 .586328 119426 .709225 
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a 


Ok olf the number of variabl i H 
a 4 les in <list of 
RUN wanipee SES (32768 to 32767) variables> exceeds the number of elements 


in the DATA statement(s), an OUT OF 


equence) 
(user types 4 for new seq "292443 322921 DATA meaadeen lat ssintaeh 


803506 .162462 929364 


ok olf the number of  variabl i i 
tet Number Seed (-32768 to 32767)? 3 (same fewer than the number ‘ot ela entn 
m 
reaueite as first a 119426 709225 Matsnsata wit tae faeaty ate cathe 
; al 
598 (484668 .58 first unread element. "= 
olf there are no subsequent READ 
SO statements, the extra data is ignored. 
AD 
RE. 0 To reread DATA statements from the 
start, use the RESTORE statement 
Reads values from a DATA statement and assigns RESTORE). a 
ea vi 
them to variables. (See DATA.) | EXAMPLE 1 


FORMAT READ <list of variables> . 
80 FOR I=1 TO 10 
VERSIONS T-BASIC, T-DISK BASIC 90 READ A(I) 
100 NEXT I 
110 DATA 3.08,5.19,3.12,3.98,4.24 
120 DATA 5.08,5.55,4.00,3.16,3.37 


5 D 


REMARKS o A READ statement must always be used in 
conjunction with a DATA statement. 


o READ statements assign values in the : 
DATA statement to variables in the lead 


statement on a one-to-one basis. This! peogranh>segmentsREADsethes values fron 


é F the DATA statements into the ar 
o READ statement variables may be numeric execution, the value of A(1) will be a 


or string, and the values read must agree $0) ons 

with the variable types specified. If they 
do not agree, a "Syntax error" will result. EXAMPLE 2 

LIST 

o A single READ statement may access one 


or more DATA statements (they will be 
accessed in order), or several READ 
statements may access the same DATA 
statement. 
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10 PRINT "CITY", "STATEY, ngjpn 
20 READ C$,s$,z° pale 


30 DATA "DENVER,", COL 
40 PRINT C§,88,z oR ca 
O 


$e 


RUN 
CITY STATE 
DENVER, COLORADO 
Ok 


ZIP 
80211 


This program READS string and ine data 
from the DATA statement in line 30. 


REM 


Allows the user to add non-executable expl 


lanatory 


remarks to a program. 


FORMAT 


REM <remark> 


VERSIONS ‘T-BASIC, T-DISK BASIC 


REMARKS 0 REM statements are not executed but are 


output exactly as entered when the 
program is listed. 


o REM statements may be branched into 
(from a GOTC or GOSUB statement), and 
execution will continue with the first 
executable statement after the REM 
statement. 


o Remarks may be added to the end of a 
line by preceding the remark with a single 
quotation mark instead of :REM. 


WARNING Do not use REM in a data statement as it 


would be considered legal data. 


EXAMPLE 


120 REM CALCULATE AVERAGE VELOCITY 
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Gee ee ee 


130 FOR I=1 TO 20 
140 SUM=SUM + V(I) 


120 FOR I=1 TO 20 'CALCULATE AVERAGE 
VELOCITY 

130 SUM=SUM+V(I) 

140 NEXT I 


RENUM 


Renumbers program lines. 


FORMAT 


VERSIONS 
REMARKS 
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RENUM [[<new number>] [,{<old number>] 
{,<inerement>T]] 


T-BASIC, T-DISK BASIC 


o <new number> is the first line number to 
be used in the new sequence. The default 
is 10. 


© <old number> is the line in the current 
program where renumbering is to begin. 
The default is the first line of the program. 


© <inerement> is the inerement to be used in 
the new sequence. The default is 10. 


0 RENUM also changes all line number 
references following GOTO, GOSUB, THEN, 


TAN ROY 


1 aaa 


NOTE 


EXAMPLE 
RENUM 


RENUM 300,,50 


L 
ON...GOTO, ON...GOSU " ne BRL 
statements to pehiect SEs 
pe LEE ese statements, the 


f thi n 
appears after one: of th ee ate in 
Undefined lin . 
wiv" aS aerated. The incorrect ine 
number reference XXXXX is not Cre By 
RENUM, but line number yyyYY 'y 


changed. 


ot be used to change the 

: ee Snr erora lines (for example, 

RENUM 15,30 when the program has three 

lines numbered 10, 20 and 30) or to create 

line numbers greater than 65529. If 

attempted "Illegal function eall" error will 
result, 


Renumbers the entire program. 
The first new line number will 
be 10. Lines will increment by 
10. 


Renumbers the entire program. 
The first new line number will 


be 300. Lines will increment 
by 50. 

RENUM 1000,900,20 Renumbers the lines from 900 
up so they start with line 
number 1000 and increment by 
20. 

RESTORE 
Allows DATA statements to be reread from a 


specified line. 


FORMAT 
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RESTORE [<line number>] 
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VERSIONS T-BASIC, T-DISK BASIC 
REMARKS oo After a RESTORE statement is executed, 
He Hert READ statement accesses the 
irst item in the first 
she repeat DATA statement in 
olf <line number> is specifi 
ecified, thi 
READ statement accesses the first oh 
the specified DATA statement. 
EXAMPLE 
10 READ A,B,C, 
20 RESTORE 
30 READ D,E,F, 
40 DATA 57, 68, 79 
RESUME 


Allows program execution to e 
recovery procedure has been performed. 


A 
‘ontinue after an error 


FORMAT 


VERSIONS 


REMARKS 
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RESUME 


RESUME 0 


RESUME NEXT 
RESUME <line number> 
T-BASIC, T-DISK BASIC 


© Any one of the 


depending 
Tesume. 


four formats may be used, 


upon where execution is to 
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esumes at the 


RESUME Execution Fr 
key statement which caused the 
RESUME 0 error. 


the 


it it 
RESUME NEXT Execution resumes i 
ak statement immediately following 


the one which eaused the error. 


RESUME <line Execution resumes at 
number> <line number>. 


o A RESUME statement that is not in an 
error trap routine causes a "RESUME 
without error" message to be printed. 


EXAMPLE 


10 ON ERROR GOTO 900 


900 IF (ERR=230)AND(ERL=90) THEN PRINT 
"TRY AGAIN":RESUME 80 


RETURN 


Exits 


from a subroutine. 


FORMAT 


RETURN 
RETURN <line number> 


VERSIONS T-BASIC, T-DISK BASIC 


REMARKS o RETURN causes a jump to the line 


following the previous GOSUB statement. 
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o RETURN <line number> (T-DISK BASIC 
only) is primarily intended for use with 
interrupts. This form allows the interrupt 
routine to go back into the BASIC program 
at a fixed line number, while still exiting 
the GOSUB entry generated by the 
interrupt. 


Use of the non-local RETURN must be done 
with care! Any other GOSUB, WHILE or FOR 
that was active at the time of interrupt will 
remain active. If the interrupt causes a branch 
out of the subroutine, any attempt to continue 
loops outside the subroutine will result in a 
‘NEXT without FOR" error. 


RUN 


Executes the program currently in memory. 


FORMAT 1 
VERSIONS 
REMARKS 


EXAMPLE 
FORMAT 2 


VERSIONS 
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RUN [<line number>] 
?-BASIC, T-DISK BASIC 
olf <line number> is specified, execution 


begins on that line. Otherwise, execution 
begins at the lowest line number. 


o T-BASIC always returns to command level 
after a RUN is executed. 


RUN 
RUN "<filename>"L,R] 


T-BASIC, T-DISK BASIC 


is the name used when the file 


REMARKS o <filename> i 
was SAVEd. 
© RUN closes all open files and deletes une 
current contents of memory before loading 
the designated program. 
o However, with the "R” option, all data 
files remain open. 
EXAMPLE 
RUN "NEWFIL",R 
See Appendix A 
SAVE 
Saves a program file on disk or RAM PACK. 
FORMAT SAVE "<filename>"[,A] 
VERSIONS T-BASIC, T-DISK BASIC 
REMARKS o If <filename> already exists, the file will 
be written over. 
o The A option saves the file in ASC 
s I 
format. Otherwise, BASIC saves the file 
in a compressed binary format. 
o ASCII format takes more space on the di 
ie disk 
or RAM PACK, but some disk accesses 
eaulte et files be in ASCII format. For 
stance, the MERGE ec fr 
ASCH (antttheMnliee Wid. 9 UREG 
EXAMPLE 
SAVE"COM2",A 


See Appendix A. 
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SCREEN 


Defines the level of resolution of CRT, allowing for 
text, low-resolution, or high-resolution modes. 


FORMAT 


VERSIONS 


REMARKS 


SCREENn 
where n is 0,1, or 2 


T-BASIC, T-DISK BASIC 


o The integer n specifies a screen mode: 
0 text mode 
if low-resolution mode 
2 high-resolution mode 


o There are 25 by 80 characters per screen. 


o In text-mode, the number of characters 
displayed is defined by the WIDTH command. 


© In low-resolution mode each addressable 
sereen position is called a dot. The 
maximum number of dots in this mode is 
160 by 100 dots. 


© In high-resolution mode there are 640 by 
200 addressable dots. 


o To use the high-resolution mode a high 
resolution color display monitor _is 
necessary. In high-resolution mode the 
color code of LINE, PSET or CIRCLE is 
ignored, and is displayed in foreground 
color by the function COLOR. 


EXAMPLE 1 


SCREEN 1 
Ok SOUND. 
LINE (40,20)-(60,21) 
Ok 
Sounds a note for the specified duration. 
EXAMPLE 2 
SCREEN 2 


FORMAT SOUND <note>,<duration> 


Ok 
LINE (20,50)-(30,65) 
* VERSIONS _T-BASIC, T-DISK BASIC 


REMARKS 0 <note> may range from 0 to 82; the value 
zero means rest. 


SET. 
Assigns an attribute to’ a device or a file. An ° Se ere era rong to 65,535 
attribute can protect, allow read after write or . 
release the device or file. Neto Table 


Octavi 
FORMAT SET <device number>, "<attribute>" e 
SET #<file number>, "<attribute>" 
SET "<device number>:<filename>", 
"gattribute>" 


VERSIONS  T-BASIC, T-DISK BASIC 


REMARKS o <device number> is an integer from 1 to 5 
representing a disk drive or RAM PACK. 


© <file number> designates a file by the 
number used to OPEN the file. 


© <attribute> can be P for protect, R for 
read after write or a space for release of 
the device or file. EEN 
= 10 FOR I=1 TO 50 STEP 2 
20 SOUND 1,32 
30 NEXT I 
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STOP 


SIC to 
Terminates program execution and returns BA 


the command level. 


FORMAT STOP 
VERSIONS T-BASIC, T-DISK BASIC 


REMARKS o STOP statements may be used anywhere in 
@ program to terminate execution. 


o When a STOP is encountered, the following 
message is printed: 
Break in line nnnnn 


o Unlike the END statement, the STOP 
statement does not close files. 


o T-BASIC always returns to command level 
after a STOP is executed. Execution is 
resumed by issuing a CONT command. 


EXAMPLE 
10 INPUT A,B,C 
20 K=A72* =B*3/.26 
30 STOP 
40 M=C*K+100:PRINT M 
RUN 
2) 1025) 3} 
BREAK IN 30 
Ok 
PRINT L 
30.7692 
Ok 
CONT 
115.9 
Ok 
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SWAP 


Exchanges the values of two variables, 


FORMAT swap <variable>,<variable> 
VERSIONS T-BASIC, T-DISK BASIC 


REMARKS oo Any type variable may be SWAPed 


(integer, single precision, a isi 
eine) , double precision, 


© The two variables must be of th 
J ie sam 
type or a "Type mismatch" error results. ‘ 


EXAMPLE 
LIST 
10A$=" ONE " : B$=" ALL " ; Cg=n Mt 
20 PRINT A$ C$ B$ pai’ 
30 SWAP A$, BS 
40 PRINT A$ C$ BS 
RUN 
Ok 
ONE FOR ALL 
ALL FOR ONE 
Ok 


TERM 


Sets terminal mode whic 


EET h makes the computer act as 


FORMAT TERM <speed>[,[<mode>] [,<echo>]] 
TERM<channel>[, <spéed>[, <modef, <echo>]]) 


VERSIONS T-BASIC, T-DISK BASIC 
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REMARKS Causes computer to act as a terminal. 
i) T-BASIC VERSION 


© <speed> may’be set to 75,110, 150,300 
or 600 baud. The initial default value, 
if omitted, is assumed to be 300 baud. 
Subsequent default values, if omitted, 
are assumed to be equal to the value 
used in the last TERM command. 


The range of <mode> is 0 to 255, and 
is used to indicate parity on or off, 
the number of stop bits, and the 
character length. Use the Intel 8251 
mode instruction definition to determine 
mode values for alternative 
communications characteristics. 


For example: 


<mode> equals 127 for no parity, 8 bits 
transmitted plus 2 stop bits. 


or 


<mode> equals 199 for no parity, 7 bits 
transmitted plus 2 stop bits. 


<echo> is either H for half-duplex or F 
for full-duplex. The default is F. 
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ii) T-DISK BASIC VERSION 


I>, <speed. ReeaRne 
Seireal in the same manner 
arguments in the 
defined. 
o <echo> is either H for half opie or F for 
full-duplex . The default is F. 


NOTE Pressing the SHIFT-BREAK key W 
mode back to command mode. 


ill change the 


BXAMPUE ERM 600,127,H T-BASIC VERSION 


TERM -3,600,"N82",F T-DISK BASIC VERSION 


TRON/TROFE 


Acts as a debugging aid, and traces the execution of 


program statements. 


FORMAT TRON 
TROFF 


VERSIONS T-BASIC, T-DISK BASIC 


REMARKS o As an aid in debugging, the TRON 
statement (executed in either the direct or 
indirect mode) enables a trace flag that 
prints each line number of the program as 
it is executed. 


o Each line number is printed within square 
brackets. 


© The trace flag is disabled with the TROFF 


statement (or when a NEW command is 
executed). 
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EXAMPLE 
TRON 
Ok 
LIST 
10 K=10 
20 FOR J=1 TO 2 
30 L=K + 10 
40 PRINT J;K;L 


{10] [20] [30] [40] 1 10 20 
[50] [60] [30] [40] 2 20 30 
[50] [60] [70] 

Ok 

TROFF 

Ok 


WAIT. 


Suspends program execution while monitoring the 
status of a machine input port for a specified bit 
pattern. 


FORMAT WAIT <port number>, I[,J] 
where I and J are integer expressions 


VERSIONS ‘T-BASIC, T-DISK BASIC 


REMARKS 0 The WAIT statement causes execution to 
be suspended until a specified machine 
input port develops a specified bit pattern. 


o The data read at the port is exclusive 
OR'ed with the integer expressi 
then AND'ed with L : ahaa 
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ib 18004 


back 
o If the result is zero, eal goin: 
and reads the data at the pi 
tion 
ii nonzero, execu 
olf the result Js a 
continues with the next stateme 
is zero. 
o If J is omitted, it is assumed to be 
n_ infinite loop with 
ich case it will be 
t the machine. 


i i iter al 

CAUTION It is possible to enter Pp 
the WAIT statement, in whit 

necessary to manually restar’ 


EXAMPLE 100 WAIT 32,2 


a 


Executes a series of statements in a loop as long as 
a given condition is true. 


FORMAT WHILE <expression> 


[dloop statements>] 


WEND 
VERSIONS  T-BASIC, T-DISK BASIC 
REMARKS olf <expression> is not zero (ie., it is 
true), <loop statements> are executed until 
the WEND statement is encountered. 
o BASIC then returns to the WHILE 


statement and checks <expression>. If it 
is still true, the process is 
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———— ee ee 


repeated. If it is not true, exeuction 
resumes with the statement following the 
WEND statement. 


© WHILE/WEND loops may be nested to any 
level. 


o Each WEND will match the most recent 
WHILE. 


o An unmatched WHILE statement causes a 

"WHILE without WEND" error, and an 
unmatched WEND statement causes a 
"WEND without WHILE" error. 


EXAMPLE 
90 'BUBBLE SORT ARRAY A$ 
100 FLIPS=1 'FORCE ONE PASS THRU LOOP 
110 WHILE FLIPS 
115 FLIPS=0 
120 FOR I=1 TO J-1 
130 IF A$(1I)>A$(I+1) THEN 
SWAP A$(1),A$(I+1):FLIPS=1 
140 NEXT I 
150 WEND 


WIDTH 


Specifies CRT width. 


FORMAT WIDTH <line size> 


VERSIONS T-BASIC, T-DISK BASIC 


REMARKS 0 WIDTH is meaningful only when the screen | 
is a CRT. 


© The value of <line size> must be in the 
range of 1 to 80. 
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is specified, the 
is adjusted to 
r line with 24 


o If a value less than 37 i 
size of the characters 
display 36 characters pe! 
lines per screen. 


WIDTH LPRINT 


‘ to 80 is 

olf a value in the range of 37 . 

specified, the size of the Sea Nike Specifies the printed line width (in number of 
adjusted to display 80 characters per a characters) for the printer. 


with 25 lines per screen. 


© The number of positions on the screen is a FORMAT OT TN. 
function of CRT/LCD, WIDTH and SCREEN 


resolution as follows: VERSIONS T-BASIC, T-DISK BASIC 


REMARKS o <integer expression> must have a value in 


Device WIDTH Screen Resolution Max X Max Y 


CRT <37 low-resolution 1 95 the range 1 to 255. 

CRT <37 high-resolution 287 191 . . 

CRT >36 low-resolution 159 99 0 Default width is 80 characters. 

CRT >36 high-resolution 639 199 b b ; 
LCD * * 319 63 H o If <integer expression> is 255, the line 
L 3 text-mode no graphics width is "infinite"; that is, T-BASIC never 


inserts a carriage return. However, the 
* = For all 7 i a position of the print head, as given by 

pleat IS POS or LPOS function, returns to zero 
after position 255. 


EXAMPLE 
10 SCREEN 1 - EXAMPLE 
a ay e 10 LPRINT "ABCDEFGHIJKLMNOPQRSTUVWXYZ" 
RUN 
40 COLOR 0,7 | 
{OL CR Le [SP SDEELELIN SSOP Mei82 
60 X=X+7: Y=X+15 
70 LINE (X,X}(Y,Y),N,BF ae ace 
80 X=X+5 RUN 
90 NEXT N ABCDEFGHIJKLMNOPQR 
WIDTH 20 OBL ARE 
WIDTH 43 
WIDTH 80 
WIDTH 36 
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WRITE 


Outputs data to the screen. 


FORMAT 
VERSIONS 
REMARKS 


EXAMPLE 


WRITEL<list of expressions>] 


T-BASIC, T-DISK BASIC 


© If <list of expressions> is omitted, a blank 


line is output. 


olf <list of expressions> is included, the 
values of the expressions are output on 
the screen. 


i i i be numeric 
o The expressions in the list may 
and/or string expressions, and they must be 
separated by commas. 


© When the printed items are output, items 
are separated by commas, 


© Printed strings are delimited by quotation 
marks. 


o After the last item in the list is printed, 


T-BASIC inserts a carriage return/line feed. 


o WRITE outputs numeric values using the 
same format as the PRINT statement. 


10 A=80:B=90:C$="THAT'S ALL" 
20 WRITE A,B,C$ 
RUN 
80, 90,"THAT'S ALL" 
Ok 
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WRITE# 


Writes 


data to a sequential file, inserting commas 


between items and delimiting strings with quotation 


marks, 


FORMAT 
VERSIONS 
REMARKS 


EXAMPLE 


WRITE#<file number>,<list of expressions> 


T-BASIC, T-DISK BASIC 


© <file number> is the number under which 
the file was OPENed in "0" mode. 


© The expressions in the list are string or 
numeric expressions, and they must be 
separated by commas. 


o The difference between WRITE# and 
PRINT# is that WRITE# inserts commas 
between the items as they are written to 
disk and delimits strings with quotation 
marks. Therefore, it is not necessary for 
the user to put explicit delimiters in the 
list. 


o A carriage return/line feed sequence is 
inserted after the last item in the list is 
written to file. 


Let A$="CAMERA" and B$="93604-1". 

The statement: 

WRITE#1,A$,B$ 

writes the following image to disk: 
"CAMERA","93604-1" 

A subsequent INPUT# statement, such as: 
INPUT#1,A$,B$ 

would input "CAMERA" to A$ AND "93604-1" to 


B$ 
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INTRINSIC FUNCTIONS 


any program 
All intrinsic functions may be called from any 


without further definition. 


Format Notation 

i s. In 
Function arguments are always enclosed i age st Fe 
the function formats given in this © japter, 
have been abbreviated as follows: 


X and Y Represent floating point expressions 
I and J Represent integer expressions 
X$ and Y$ Represent string expressions 


i i i lied where an 
NOTE: If a floating point value is supp! 
integer is required, T-BASIC and T-DISK BASIC 
will round the fractional portion and use the 
resulting integer. 


ABS 


Absolute value. 


FORMAT ABS(X) 
VERSIONS T-BASIC, T-DISK BASIC 


ACTION o This function returns the absolute value of 
the expression X. 


EXAMPLE 
PRINT ABS(7*(-5)) 
35 


Ok 
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ASC 


Get ASCII code for 1st string character. 


FORMAT ASC(X$) 
VERSIONS T-BASIC, T-DISK BASIC 


ACTION o Returns a numerical value that is the 
ASCII code of the first character of the 
string X$. (See Appendix C for ASCII 
codes.) 


ON ERROR olf X$ is null, an "Illegal function call" 
error is returned. 


EXAMPLE 
10 X$ = "TEST" 
20 PRINT ASC(X$) 
RUN 
84 
Ok 


See the CHR$ funetion for ASCII-to-string 
conversion, 


Arctangent. 


FORMAT ATN(X) 
VERSIONS T-BASIC, T-DISK BASIC 


ACTION © Returns the aretangent of X in radians. 
© Result is in the range -pi/2 to pi/2. 
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o The expression 


EXAMPLE 


meric 
xX may be any nu 
type, but the evaluation of ATN is always 


performed in single precision. 


10 INPUT X 
20 PRINT ATN(X) 


ATTR$ 


Get attribute file or device. 


FORMAT 


VERSIONS 
ACTION 
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ATTR$(<device number>) 
ATTR$(#<file number>) 
ATTRS("<filename>") 


T-BASIC, T-DISK BASIC 


0 To get an attribute of the designated 
device or file. 


o Accessibility of files and devices is set by 
SET statement and produces the value "P", 
"R" or a space. 


o ATTR$ assigns the value according to the 
attribute designated. 


© <file number> is a number used by OPEN 
statement. 


© <filename> is a file name in its literal 
sense, 
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EXAMPL! 


E 

10 OPEN "1:TEST" AS 1 
20 PRINT ATTR$(3) 

30 PRINT ATTR$(#1) 

40 PRINT ATTR$("1:TEST") 
RUN 


CDBL 


Double precision conversion, 


FORMAT 


CDBL(X) 


VERSIONS T-BASIC, T-DISK BASIC. 


ACTION 


© Converts X to a double precision number. 


EXAMPLE 


10 A = 454.67 
20 PRINT A;CDBL(A) 
RUN 


454.67 454.6700134277344 
Ok 


CHR$ 


Get single ASCII string character. 


FORMAT 
VERSIONS 
ACTION 


PAD8111-1 


CHRS$(I) 
T-BASIC, T-DISK BASIC 
o Returns a one element 


containing an ASCII code. 
are listed in Appendix C.) 


-159- 


integer string 
(ASCII codes 


jal 
o CHR$ is commonly used to gerd le 
character to the ere (ror (CHRS()) 


EL character could a 
ee ie preface to an error message, OF 


t (CHR$(12)) to 
feed could be sen! 2 
ee a CRT screen and return the curso 


to the home position.) 


EXAMPLE 
PRINT CHR$(66) 
B 
Ok 
See the ASC fnetion for 
conversion. 


ASCII-to-numerice 


CINT 


Decimal to integer conversion. 


FORMAT CINT(X) 
VERSIONS T-BASIC, T-DISK BASIC 


ACTION o Converts X to an integer by rounding the 
fractional portion. 


ON ERROR o If X is not in the range -32768 to 32767, 
an "Overflow" error occurs. 


EXAMPLE 
PRINT CINT(45.67) 

46 

Ok 


See the CDBL and CSNG functions for 
converting numbers to the double precision and 
single precision data type. 

See also the FIX and INT functions, both of 
which return integers. 
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Cosine 


FORMAT COS(X) 
VERSIONS T-BASIC, T-DISK BASIC 
ACTION © Returns the cosine of X in radians. 


© The calculation of COS(X) is performed in 
single precision. 


EXAMPLE 
10 X = 2*COS(.4) 
20 PRINT X 
RUN 
1,84212 
Ok 


CSNG 


Convert to single precision. 


FORMAT CSNG(X) 
VERSIONS T-BASIC, T-DISK BASIC 


ACTION © Converts X to a single precision number. 


EXAMPLE 
10 A# = 975.3421# 


20 PRINT A#; CSNG(A#) 
RUN 


975.3421 975.342 
Ok 
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functions for 


and CDBL 
Scop ethe nO the integer and double © Numeric values that are read in from a 
converting numbers to » § 
recision data types. } random disk file or RAM PACK file must 
D be converted from strings back into 
numbers, 
CSRLIN © CVI converts a 2-byte string to an integer. 
4 iti ti byt ii 
Return vertical cursor position. © oe converte ail: yte string to a single 
ra 7 
FORMAT CSRLIN xD converts an byte string to a double 
VERSIONS T-BASIC, T-DISK BASIC EXAMPLE 
ACTION o Returns the line number of the cursor 
position. : 
ernest 70 FIELD #1,2 AS A$, 4 AS B$, ... 
o The value for the first line is 0. a ae De , $. $, 
| 90 Y=CVS(A$) 
EXAMPLE % 
10 PRINT CSRLIN = : 
20 PRINT CSRLIN , 5 
RUN 
a F See MKI$, MKS$, MKD$ and Appendix A. 
Ok 
DSKF 
CVI, CVS, CVD Returns available space on disk or RAM PACK. 


Convert string values to numeric values. 
FORMAT DSK F(<drive number>) 


FORMAT CVI(<2-byte string>) | VERSIONS T-BASIC, T-DISK BASIC 
CVS(<4-byte string>) 
CYD(<8-byte string>) ACTION © Free disk or RAM PACK space is given as 
1 a an integer representing a cluster of 8 
VERSIONS T-BASIC, T-DISK BASIC sectors. 
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‘ i from 1 to 5 
© <drive number> is an ASS RAM PACK. 


representing & disk drive or 


EXAMPLE PRINT DSKF(1) 
End of file. 


DSKI$ ron ; 
AT EOF (<file number? 
Read designated sector of disk or RAM PACK. e 
(ait a oF ohh det ee VERSIONS ‘T-BASIC, T-DISK BASIC 
FORMAT  DSKI$(<drive number>,<head number>,<track ACTION o Returns -1 (true) if the end of a 
number>,<sector number>) sequential file has been reached. (Use 
EOF to test for end-of-file while 
VERSIONS T-BASIC, T-DISK BASIC INPUTing, to avoid "Input past end" errors.) 
ACTION © <drive number> is an integer from 1 to 5. EXAMPLE 
o <head number> is 0 or 1, and may be 10 OPEN "1:DATA" 
omitted for the RAM pack 2. | 20 C=0 
o <track number> is an integer from 0 to 34. 4 30 IF EOF(1) THEN 100 
o <sector number> is an integer from 1 to 16, 40 INPUT #1,M(C) 
> ; 50 C=C+1:GOTO 30 
© 255 bytes of data are read from the . 
designated sector as a character string. . 


© Since one dise sector is composed of 256 
characters, the last byte is not read by 


this function. (However, the FIELD#0 EXP 
Saad reads 256 bytes of data into file 
buffer 0; users can then read one sector 
of data from buffer 0). Returns e to the power of X. 
EXAMPLE 
PRINT DSKIS(1,0,3,1) FORMAT EXP(X) 
10° FIELD#0,128 AS A$, 128 AS BS VERSIONS T-BASIC, T-DISK BASIC 
20 TYPE$ = DSKI$(1,0,3,1) 


30 PRINT A$,B$ | ACTION o X must be less than or equal to 87.3365. 


o If EXP overflows, the "Overflow" error 
message is displayed, machine infinity with 
the appropriate sign is supplied as 
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i inues. 
the result, and execution continu’ 


EXAMPLE 
10 X =5 
20 PRINT EXP (X-1) 
RUN 
54.5982 
Ok 


2 i 2 aed 
Decimal to integer conversion by truncation. 

PMA nite ite. te 

FORMAT FIX(X) 

VERSIONS T-BASIC, T-DISK BASIC 

ACTION © Returns the truncated integer part of X. 


o The major difference between FIX and INT 
is that FIX does not return the next lower 
number for negative X. 


EXAMPLE 
PRINT FIX(58.75) 
58 


Ok 
PRINT FIX(-58.75) 
-58 
Ok 


FPOS 


Get current read/write head position on disk or RAM 
PACK. 


FORMAT _ FPOS (file number) 
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VERSIONS 
ACTION 


EXAMPLE 


T-BASIC, T-DISK BASIC 


o <file number> must be a number assigned | 
by OPEN statements. 


o The returned value of this function is a 
sector number of the designated file where 
the next read or write operation will 
execute. 


o The value is an integer given by the 
following table: 


H Track Sector Value 
0 0 0-7 

1 0 8-15 
0 0 16-23 
1 0 24-31 
1 


34 9-16 1112-1119 


Conversion from the value to head, track 
and sector number is given by the 
following expressions: q 


head number (value\8)MOD2 

track number value\32 

sector number value MOD8+ 
((value\16)MOD2)*8+1 


10 OPEN "1:TESTPR" FOR INPUT AS 1 
20 PRINT FPOS(1) 
30 CLOSE 1 
RUN 
472 
Ok 
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hexadecimal value of the decimal argument. 


FRE 
o X is rounded to an integer before HEX$(X) 
Number of bytes in memory not used by T-BASIC. is evaluated. 
EXAMPLE 
FORMAT FRE(O) 10 INPUT X 
FRE(X$) ; 20 A$ = HEX$(X) 
30 PRINT X "DECIMAL Is " A$ " HEXADECIMAL 
VERSIONS T-BASIC, T-DISK BASIC RUN 
2 32 
ACTION o Arguments to FRE are dummy arguments. 32 DECIMAL IS 20 HEXADECIMAL 
Ok 
o FRE("") forces a "garbage collection" 
before returning the number of free See the OCT$ function for octal conversion. 
bytes. NOTE: garbage collection may take 
1 to 1-1/2 minutes. 
INKEY$ 
o BASIC will not initiate garbage collection | 
until all free memory has been used up. Read keyboard character. 
Therefore using FRE(") periodically will / 
result in shorter delays for each ga 7 
collection. Mi parbege d FORMAT — INKEY$ 
EXAMPLE VERSIONS ‘T-BASIC, T-DISK BASIC 
PRINT FRE(0) | 7 
14542 ACTION o Returns either a one-character string 
Ok containing a character read from the 
keyboard or a null string if no character 
is pending at the keyboard. 
HEX$ o No characters will be echoed and all 
characters are passed through to the 
Get hexideci | program except those from BREAK, COPY, 
exidecimal value of decimal argument. RABEL CONTROL-C,  CONTROLO, 
CONTROL-S and PF keys. 
FORMAT EXAMPLE 
HESS) 10 AS-INKEY$ 
VERSI | 20 IF A$="" GOTO 10 
VERSIONS T-BASIC, T-DISK BASIC 30 B=ASC(A$)MOD 45 


40 PRINT TAB(B);A$ 


ACTION © Returns a string which represents the 50 GOTO 10 


¥ b 
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EXAMPLE 
INP 


Read I/O port byte. . ; ; 100 PRINT "TYPE P TO PROCEED OR § TO 


110 X$=INPUTS(1) 
FORMAT —_ INP(D) 120 IF X$="P" THEN 500 


130 IF X$="S" THEN 700 ELSE 100 
VERSIONS T-BASIC, T-DISK BASIC 


ACTION o Returns the byte read from port I. 


o I must be in the range 0 to 255. 


o INP is the complementary function to the 


5 INSTR 
OUT function. 


00 A=INP(255) Find string starting address. 
EXAMPLE 1 = 


FORMAT INSTR(LL,JX$,Y$) 


INPUTS 1 oa 4 VERSIONS _T-BASIC, T-DISK BASIC 


Read character string from keyboard or file. ACTION © Searches for the first occurrence of string 
Y$ in X$ and returns the position at 
which the match is found. 

FORMAT _—_INPUT$(X(,L#]Y) 


© Optional offset I sets the position for 


VERSIONS T-BASIC, T-DISK BASIC starting the search. 

ACTION o Returns a string of X characters, read o I must be’ in the range of 1 to 255. 
from the keyboard or from file number Y. 

o If DLEN(X$) or if X$ is null or if Y$ 
olf the keyboard is used for input, no cannot be found, INSTR returns 0. 

characters will be echoed and all control es 
characters are passed through except those o If Y$ is null, INSTR returns I or 1. 
from the BREAK key and CONTROL-C, . f is - 
which are used to interrupt the execution © X$ and Y$ may be string variables, string 
of the INPUT$ function. Pr expressions or string literals. 


EXAMPLE 10 X$ = "ABCDEB" 


PAD8111-1 -170- PAD8111-1 -171- 


20 Y$ = "B" 
30 PRINT INSTR(X$,YSVINSTRLXS,¥) 


VERSIONS T-DISK BASIC 


RUN 
aus ACTION o Get the previously entered function key 
i "ILLEGAL number. 
NOTE If 1-0 is specified, error message "IL : 
U i ber>" will be returned. o The value is a number betwen 1 and 8 
ARGUMENT IN <line num! + f 
i corresponding to function keys PF1 through 
PFS. 
INT o If no function key is pressed, 0 will be 
2 returned. 
Find largest integer less than or equal to X. AMPLE 
10 A=KEY 
20 IF A=0 GOTO 10 
FORMAT _ INT(X) 30 PRINT "PE";A 
VERSIONS  T-BASIC, T-DISK BASIC } ’ se 
ACTION o Returns the largest integer less than or Ok 
equal to X. 
EXAMPLE , ; LEFTS 
PRINT INT(99.89) 
99 Return string or string segment. 
Ok 
PRINT INT(-12.11) » FORMAT LEFT$(X$,1) 
713 
Ok VERSIONS T-BASIC, T-DISK BASIC 
See the FIX and CINT functions which also 7 ACTION o Returns a string comprised of the leftmost 
return integer values. I characters of X$. 
o I must be in the range 0 to 255. 
KEY olf I is greater than LEN(X$), the entire 
; a string (X$) will be returned. 
Get function key number. ' olf I=0, the null string (length zero) is 


returned. 


FORMAT KEY 
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EXAMPLE 
10 A$ = "T-BASIC" 
20 B$ = LEFT$(A$,5) 
30 PRINT B$ 
T-BAS. 
Ok 


Also see the MID$ and RIGHT$ functions. 


Get number of string characters. 
(ae a ES Eee 


FORMAT LEN(X$) 
VERSIONS T-BASIC, T-DISK BASIC 
ACTION © Returns the number of characters in X$ 


© Non-printing characters and blanks are 
counted, 
LE 
aa 10 X$ = "PORTLAND, OREGON" 
20 PRINT LEN(X$) 
16 
Ok 


Loc 


Get previously read or written record number. 


FORMAT LOC(<file number>) 
VERSIONS ‘T-BASIC, T-DISK BASIC 


ACTION o With random disk files or RAM PACK 
files, LOC returns the record number 
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just read or written from a GET or PUT. 


o If the file was opened but no file I/O has 
been performed yet, LOC returns a 0. 


© With sequential files, LOC returns the 
number of sectors read from or written to, 
the file since it was OPENed. 


EXAMPLE 200 IF LOC(1)>50 THEN STOP 


Get file size. 


FORMAT _—_LOF(<file number>) 
VERSIONS T-BASIC, T-DISK BASIC 


ACTION o For random files the maximum record 
number is returned. 


o For sequential files the number of sectors 
used is returned. 


o For either file type, the value is sampled 
at the execution of an OPEN. 


o If no data exists on the file, a zero will 
be returned. ° 


EXAMPLE 
10 OPEN "1:TESTDT" AS1 
20 FIELD 1, 10 AS A$, 10 AS B$ 
30 A=LOF(1) 
40 PRINT A 
50 FOR I=1 TO 2 
60 LSET A$= "TOSHIBA" 
70 LSET B$= "T100" 
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PUT 1,A+I 4, 
He PRINT LOF(1);A$,B$ 1 © Does not necessarily give the Physical 


postion of the print head. 


100 NEXT 
110 CLOSE 1 o X is a dummy argument. 
EXAMPLE 100 IF LPOS(X)>60 THEN LPRINT CHR$(13) 
LOG 
MID$ 
Natural log. 
Get a string segment. 


FORMAT LOG(X) 


FORMAT — MIDS$(X$,I[,J) 


VERSIONS T-BASIC, T-DISK BASIC 


ACTION o Returns the natural logarithm of X. VERSIONS T-BASIC, T-DISK BASIC 


ACTION o Returns a string of length J characters 


© X must be greater than zero. } from X$ beginning with the Ith character. 
EXAMPLE var) - © land J must be in the range 1 to 255, 
PRINT LOG(45, “i 
1.86075 o If J is omitted or if there are fewer than 
Ok J characters to the right of the Ith 


character, all rightmost characters 
beginning with the Ith character are 


returned. 
LPOS: 
: If IDLEN(X$), MID$ returns a null string. 
Get line printer print head position within print 
buffer. EXAMPLE 
LIST 
10 A$="GOOD " 
ORMAT — LPOS(x) 20 B$="MORNING EVENING AFTERNOON" 
FORM (X) 30 PRINT A$;MID$(B$,9,7) 
VERSIONS T-BASIC, T-DISK BASIC ok 
ACTION © Returns the current position of the line A —_ GOOD EVENING 
printer print head within the line printer 
buffer. 
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Also see the LEFT$ and RIG 


HT$ functions. 


ge "ILLEGAL 


NOTE If I=0 is specified, error meswBy  neg, 


ARGUMENT IN <line number?" will 


MKI$, MKS$, MKD$ 


Convert numeric values to string values. 


FORMAT  MKI$(<integer expression>) 
MKS$(<single precision expression>) 
MKD$(<double precision expression>) 
VERSIONS T-BASIC, T-DISK BASIC 
ACTION o Any numeric value that is placed in a 
random file buffer with an LSET or RSET 
statement must be converted to a string. 
o MKI$ converts an integer to a 2-byte 
string. 
© MKS$ converts a single precision number 
to a 4-byte string. 
© MKD$ converts a double precision number 
to an 8-byte string. 
EXAMPLE 


10 OPEN "1:TESTDT" AS 1 

20 FIELD@1, 4 AS A$,4 AS B$,8 AS C$ 
30 FOR I=1 TO 2 

40 LSET A$=STR$(I)+MKI$(100) 


50 LSET B$=MKS$(128.5) 

60 LSET C$=MKD$(12345678.9999#) 
70 PUT 1,1 

80 NEXT 

90 CLOSE 1 


100 OPEN "1:TESTDT" AS 1 
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110 FIELDe1,2 AS X$,2 AS A$,4_ AS B$,8 AS 


120 FOR I=1 TO 2 

130 GET #1,I 

140 A=CVI(A$) 

150 B=CVS(B$) 

160 C#=CVD(C$) 

170 PRINT X$;A;B;C# 

180 NEXT 

190 CLOSE 1 

RUN 

1100 128.5 12345678.9999 
2100 128.5 12345678.9999 


OCT$ 


Get octal value of decimal argument. 


FORMAT OCT$(X) 
VERSIONS T-BASIC, T-DISK BASIC 


ACTION o Returns a string which represents the 
octal value of the decimal argument. 


© X is rounded to an integer before OCT$(X) 
is evaluated. 


EXAMPLE 
PRINT OCT$(24) 
30 


See the HEX$ function for hexadecimal 
conversion. 


PEEK 


Read one byte from memory. 
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FORMAT 
VERSIONS 


ACTION 


EXAMPLE 


PEEK(I) 


T-BASIC, T-DISK BASIC 
in the range 0 to 


i (i 
o Returns the integer Toeation L 


255) read from memory 


o I must be in the range 0 to 65536. 


o PEEK is the complementary function to 
the POKE function. 


A=PEEK(23000) 


_ _ eee ee 


POINT 


Get color code at a designated coordinate. SCREEN 
1 or SCREEN 2 must be executed prior to execution 
of this function. 


FORMAT 


VERSIONS 
ACTION 
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POINT [STEP] (X,Y) 
where X and Y are coordinates of screen 


T-BASIC, T-DISK BASIC 


o (X,Y) must be in the range from (0,0) to 
(639,199). 


o A eolor code for the designated point is 
returned as an integer in the range of 0 
to 7 (see COLOR statement). 


o The coordinate can be designated either in 
absolute form (X,Y) without STEP, or 
relative form, with STEP. 


o If the coordinate point is off screen, -1 is 
returned. 
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EXAMPLE 


10 SCREEN 1 

20 PSET (40,50),2 
30 A=POINT(40,50) 
40 PRINT A 

RUN 

2 

Ok 


PORT 


Get number of characters received. 


FORMAT 
VERSIONS 
ACTION 


EXAMPLE 


PORT(<channel>) 
T-DISK BASIC 


o <channel> designates a port through which 
characters are received. 


o The value of <channel> can be -3 or -4 
depending on the RS-232C port. 


50 IF PORT(-4)=10 GOTO 150 


POS 


Get current cursor column position. 


FORMAT 
VERSIONS 


ACTION 
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POS(X) 


T-BASIC, T-DISK BASIC 


© The leftmost position is 1. 


o X is a dummy argument. 
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RS(13) 

THEN PRINT CH 

EXAMPLE rE Sea EOS function unless the random number generator is 
Iso | reseeded (see RANDOMIZE). 


© However, X<0 always restarts the same | 
RIGHTS H . sequence for any given X. 


rs of string X$. o X>0, or X omitted, generates the next 


‘i tel “ 
Returns the rightmost I chara random number in the sequence, 


o X=0 repeats the last number generated. 


FORMAT _ RIGHTS$(X$,1) 


EXAMPLE 
VERSIONS T-BASIC, T-DISK BASIC 10 FOR I=1 TO 5 
20 PRINT INT(RND*100); 
ACTION _o If I=LEN(X$), returns X$. 30 NEXT 
fe ii RUN 
olf 120 the null string (length zero) is 2% 30 31 51 5 
returned, | Ok 
EXAMPLE 
10 A$="T-DISK BASIC BASIC" 3 
20 PRINT RIGHT$(A$,5) ; SCREEN 
RUN 
BASIC 
Ok 7 Read a character at a designated screen coordinate, — 
Also see the MID$ and LEFT$ functions. 
FORMAT SCREEN(X,Y) 
where X and Y are integers 
RND VERSIONS T-BASIC, T-DISK BASIC 
Returns a pseudo-random number between 0 and 1 ACTION o When a character exists at location (X,Y) 


on the sereen, the code of the character 
is returned. 


FORMAT RND[(X)] 


VERSIONS T-BASIC, T-DISK BASIC 7 respectively. 


ACTION o The same sequence of random numbers is 


Th i 
generated each time the program is RUN onthe ‘values fot sao dp tan ead 


——o | 
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i WIDTH. 
the range defined by - 
t at the specified FORMAT __ SIN(x) 


olf graphics data ai Ayeetiried) 


location, 32(ASCII blank 


VERSIONS T-BASIC, T-DISK BASIC 


EXAMPLE ; ACTION o Returns the sine of X in radians, 
10 CLS Pest, iy 
20 LOCATE 0,0 ner © SIN(X) is calculated in single precision. 
30 PRINT "ABCD: ‘ 
ADBRORIIEDTTONG © COS(XHSIN(X+3.14159/2), 
50 A=SCREEN(,0) EXAMPLE 
80) LOCATE S2 PRINT SIN(1.5) 
70 PRINT CHR$(A) .997495 
80 NEXT Ok 
SGN SPACE$ 
Get sign of a number, 
Returns a string of spaces of length X. 
FORMAT SGN(X) 
: FORMAT SPACES$(X) 
VERSIONS T-BASIC, T-DISK BASIC 
VERSIONS _T-BASIC, T-DISK BASIC 
ACTION o If X>0, SGN(X) returns 1. 
ACTION © The expression X is rounded to an integer 
o If X=0, SGN(X) returns 0. and must be in the range 0 to 255. 
o If X<0, SGN(X) returns -1 EXAMPLE 
: 10 FORI=1TO5 
EXAMPLE ON SGN(X)}+2 GOTO 100,200,300 branches to 20 X$ = SPACES$(I) 
100 if X is negative, 200 if X is 0, or 300 } 30 PRINT X$;I 
if X is positive. 40 NEXT I 
4 RUN 
1 
n 2 
SIN ( — 3 


4 
Sine ps 
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Also see the SPC function 


a. a 


SPC 


inter. 
Prints I blanks on the screen or printe 


FORMAT SPC(I) 
VERSIONS T-BASIC, T-DISK BASIC 


i nd 
ACTION o SPC may only be used with PRINT @ 
LPRINT statements: 


o I must be in the range 0 to 255. 


o A';! is assumed to follow the SPC(I) 


command. 
EXAMPLE 
PRINT "OVER" SPC(15) "THERE" 
OVER THERE 
Ok 


Also see the SPACE$ function. 


SQR 


Square root. 


_ FORMAT SQR(X) 
VERSIONS T-BASIC, T-DISK BASIC 
ACTION o Returns the square root of X. 


o X must be >0. 
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EXAMPLE 


10 FOR X = 10 TO 25 STEP 5 
20 PRINT X, SQR(X) 

30 NEXT 

RUN 

10 3.16228 

15 3.87298 

20 4.47214 

25 5 
Ok 


STR$ 


Represent numeric value as a string. 


FORMAT STR$(X) 
VERSIONS T-BASIC, T-DISK BASIC 


ACTION o Returns a_ string representation of the 
value of X. 


EXAMPLE 
5 REM ARITHMETIC FOR KIDS 
10 INPUT "TYPE A NUMBER";N 
20 ON LEN(STR$(N)) GOSUB 
30 100,200,300,400,500 


Also see the VAL function. 


STRING$ 


Return specified string segment. 
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FORMAT 


VERSIONS 
ACTION 


EXAMPLE 


STRINGS(,J) 
STRINGS(,X$) 


T-BASIC, T-DISK BASIC : 
i length 1 whose 
a string of aecthe 
: aunrattor® all have ASCII code J 
first character of x$. 


= STRINGS(10,45) 
10 XS NT X$ "MONTHLY REPORT" X$ 


a MONTHLY REPORT————_ 


Ok 


Set a tab. 


FORMAT 


TAB() 


VERSIONS T-BASIC, T-DISK BASIC 


ACTION 


o Spaces to position I on the sereen or 
printer. 


olf the current print position is already 
beyond space I, TAB goes to that position 
on the next line. 


o Space I is the leftmost position, and the 
rightmost position is the width minus one. 


o I must be in the range 1 to 255. 


o TAB may only be used in PRINT and 
LPRINT statements. 
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EXAMPLE 10 PRINT"NAME"TAB(15)"AMOUNT":PRINT 
20 READ A$,B$ 
30 PRINT A$ TAB (15) BS 
40 DATA "G.T.JONES",$25.00 
RUN 
NAME AMOUNT 
G.T.JONES $25.00 
Ok 


Tangent. 


FORMAT TAN(X) 
VERSIONS ‘T-BASIC, T-DISK BASIC 


ACTION o Returns the tangent of X in radians. 


© TAN(X) is calculated in single precision. 


olf TAN overflows, the "Overflow" error 
message is displayed, machine infinity with 
the appropriate sign is supplied as the 
result, and execution continues. 


EXAMPLE 10 Y = Q*TAN(X)/2 


TIME and TIME$ 


Get the current time of day. 


FORMAT TIME$ 
TIME 
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VERSIONS T-BASIC, T-DISK BASIC o If <digit> is omitted, it is assumed equal 


- ter-string value in 4 to 0. (See Appendix F.) 
adi 3 ‘he form of fans. where: EXAMPLE 
HH is hours (00-28) 40 B= T*SIN(Y) 
MM is minutes (00-5 50 C= USR(B/2) 
SS is seconds (00-59). | 60 D = USR(B/3) 


© To set a time to TIMES use: 


TIMES$=<string exp? : 
5 <string exp> must be "HH:MM:SS" ang 

if any of the values are out of } 

range, an "Illegal Function Call _. =e 

error is issued and the previous time a 

is retained. 


Get numerical value of string X$. 
© <string variable>=TIME$ is used to set the ig X$. 
current time of day to a variable. 


‘ FORMAT © VAL(X$) 

TIME has the current time of day (in 

seconds) corresponding to TIME$. — Thus, i VERSIONS T-BASIC, T-DISK BASIC 

X=TIME is used to get the value for z 

processing. , ACTION o The VAL function also strips leading 
blanks, tabs, and linefeeds from the 
argument string. For example: 


UsR ores 
Call assembly language subroutine. EXAMPLE 
10 READ NAME$,CITY$,STATES,ZIP$ 
FORMAT USRI<digit>XX) THEN PRINT NAME$ TAB(25) 
VERSIONS T-BASIC, T-DISK BASIC Ny 30 TE VALCES) eave] AND. VAL(ZIP$)<=90815 | 


THEN PRINT NAME$ TAB(25) "LONG BEACH" 


ACTION © Calls an assembly language subroutine with 
the argument X. 

o <digit> is in the range 0 to 9 and : 

corresponds to the digit supplied with the See the STR$ function for numerie to string | 

DEF USR funetion for that routine. conversion. ‘ 
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VARPTR 


of data identified with 
jal files, returns 
hee 4 to <file 


Returns address of a byte 
<variable name> or for sed i 
starting address of disk 1/0 buffer assigned 
number>. 


FORMAT 1 VARPTR(<variable name>) 
FORMAT 2 VARPTR(#<file number>) 
VERSIONS T-BASIC, T-DISK BASIC 


ACTION o A value must be assigned to <variable APPENDICES 
name> prior to execution of VARPTR. 
Otherwise an "Illegal function eall" error 
results. 


o Any variable name type may be used 
(numeric, string, array), and the address 
returned will be an integer in the range 
32767 to-32768. 


o If a negative address is returned, add it to 
65536 to obtain the actual address. 


o VARPTR is usually used to obtain the 
address of a varible or array so it may be 
passed to an assembly language subroutine. 


o A function call of the form VARPTR(A(0)) 
is usually specified when passing an array, 
so that the lowest-addressed element of 
the array is returned. 
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APPENDIX A 
DISK AND RAM PACK 1/O 


This appendix explains disk and RAM PACK 1/O 
Procedures for the new T-BASIC and T-DISK BASIC user. 
If you are new to the BASIC language or if you are 
getting disk related errors, read through these procedures 
and program examples to make sure you are using all the 
disk and RAM PACK statements correctly. 


PROGRAM FILE COMMANDS 


Here is a review of the commands and statements used in 
program file manipulation. 


SAVE"<filename>"[,A] o Writes the program that is 
currently residing in 
memory to disk or RAM 
PACK. 

Option A_ writes the 
program as a_ series of 
ASCIL characters. 
(Otherwise, T-BASIC or 
T-DISK BASIC uses a 
compressed binary format.) 


LOAD"<filename>"[,R) Loads the program from 
disk or RAM PACK intc 
memory. 

LOAD always deletes the 
current contents of 
memory and closes all files 
before LOADing. 

Option R runs the program 
immediately. ie OW Ty 
ineluded, however, open 
data files are kept open. 
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RUN"<filename>"L,R] 


MERGE"<filename>" 


MERGE"<filename>" 


KILL"<filename>" 
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be 
ograms can © 
WD) Os or loaded =n 


hained 
sections and can access 
the same data files. 
i ds a 
<filename? loa: 
3 Sori from disk or ee 
pack into memory an 
runs it. 


o RUN deletes the Gos 
contents of memory an 
closes all fia before 

ing the program. ; 

° ie the R_ option is 
included, all open data 
files are kept open. 


ds the program from 
aa or RAM PACK into 
memory but does not 
delete the current 
contents of memory. 

o The program line numbers 
on disk or RAM PACK are 
merged with the program 
line numbers in memory. 
If two lines have the same 
number, only the line from 
the disk or RAM PACK 
program is saved. 


o After a MERGE command, 
the "merged" program 
resides in memory, and the 
language returns to 
command level. 


© Deletes the file from the 
disk or RAM PACK, 

o <filename> may be a 
program file, or a 
sequential or random 
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access file, 

NAME"<old filename>" © To change the name of a 
disk or RAM 

AS"<new filename>" o PACK file, execute NAME 
"<oldfilename>" AS 
"<newfilename>", 

© NAME may be used with 
program files, random 
files, or sequential files, 


DISK _AND RAM PACK DATA FILES - SEQUENTIA 
RANDOM 1/0 28 ia 


Two types of disk and RAM PACK data files may be 
created and accessed by a T-BASIC or T-DISK BASIC 
program on the T100: sequential and random. 


Sequential Files 


Sequential files are easier to create than random files, 
but offer limited flexibility and speed in accessing the 
data. Data written to a sequential file is stored, one 
item after another (sequentially), in the order it is sent, 
and is read back in the same way. i 


The statements and functions that are 


sequential files are: eh wit 


OPEN WRITES 
PRINT# CLOSE 


PRINT# USING EOP 
INPUT# Loc 
LINE INPUT# 


To create a sequential file and access its ‘ 
following command sequence: data, use the 
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MARKS 
COMMAND. rue 


1. OPEN "DATA" FOR OUTPUT the file _ in 
AS #1 output mode. 


ae Write data to the 
2. PRINT#1,A$;B$;C$ file using the 
PRINT# statement 
(WRITE# may be 
used instead.) 


To access the data 
in the OPEN "DATA" 
FOR INPUT AS #1 
file, you must CLOSE 
the file and reOPEN 
it in input mode. 


3. CLOSE #1 


4, INPUT#1,X$,Y$,Z$ Use the INPUT# 
statement to read 
data from the 
sequential file into 
the program. 


A program that creates a sequential file can also write 
formatted data to the disk with the PRINT# USING 
statement. For example, the statement 


PRINT #1, USING" ####.##,"3A,B,C,D 


could be used to write numeric data to disk or RAM 
PACK without explicit delimiters. The comma at the end 
of the format string serves to separate the items in the 
disk file or RAM PACK file. 


The LOC function, when used with a sequential file, 
pete ae Tuber jot sectors that have been written to 
or read from the file since it was OPENed, ii 
a 256-byte block of data. Sper og 
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Adding Data To A Sequential File 

Because the current contents of an existing sequential 
file are destroyed when it is opened in the output mode, 
you must follow specific procedures to add data to an 
existing sequential file. These procedures are illustrated — 
in the following example with a file called "NAMES." 


L OPEN "NAMES" in input mode. 


2. OPEN a second file called "COPY" in output 
mode. 


3. Read in the data in "NAMES" and write it to 
copy. 


CLOSE "NAMES" and KILL it. 

Write the new information to "COPY". 

Rename "COPY" as "NAMES" and CLOSE. 

Now there is a file on disk or RAM PACK 
called "NAMES" that ineludes all the previous 
data plus the new data you just added. 


Random Files 


Although creating and accessing random files requires 
more program steps than for sequential files, there are 
advantages to using random files. One advantage is that 
random files require less room on the disk or RAM 
PACK, because T-BASIC or T-DISK BASIC stores them in 
a packed binary format. (A sequential file is stored as a 
series of ASCII characters.) 


The biggest advantage to random files is that data can be 
aecessed randomly, i.e., anywhere on the disk or RAM 
PACK — it is not necessary to read through all the 
information, as with sequential files. This is 
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and accessed in 


ion i ed 
possible because the information is Record is numbered. 
distinct units called records, and e@ 


4 use 
The statements and functions that are 


files are: 


OPEN 
FIELD. 
LSET/RSET 
GET 

PUT 
CLOSE 
LOC 


Creating A Random File 


The following program steps 
random file: 


COMMANDS 
1. OPEN "FILE" AS #1 


2. FIELD #1,20 AS N$, 


3. LSET N$=X$ 
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4 with random 


MKI$ 
MKS$ 
MKD$ 
cv 
cvs 
cvD 


are required to create & 


REMARKS 


OPEN the file for random 
access. 


Use the FIELD statement 
to allocate 4 AS A$, 8 AS 
P$ space in the random 
buffer for the variables 
that will be written to the 
random file. 


Use LSET to move the 
data into the LSET 
AS=MKS$(AMT) random 
buffer. Numeric values 
must LSET P$=TEL$ be 
made into strings when 
placed in the buffer. To 
do this, use the "make" 
functions: MKI$ to make 


an integer value into a 
string, MKS$ for a single 
precision value, and MKD$ 
for a double precision 
value. 

4. PUT #1,CODE% Write the data from the 
buffer to the disk or RAM 
PACK using the PUT 
statment. 


The following program illustrates information that is 
written to a random file. Each time the PUT statement 
is executed, a record is written to the file. The 
two-digit code that is input in line 30 becomes the record 
number. 


NOTE: Do not use a FIELDed string variable in an 
INPUT or LET statement. This causes the | 


pointer for that variable to point into string 
space instead of the random file buffer. 


EXAMPLE: CREATE A RANDOM FILE 


10 OPEN "FILE" AS #1 

FIELD #1,20 AS N$, 4 AS A$, 8 AS P$ 
INPUT "2-DIGIT CODE";CODE% 
INPUT "NAME";X$ 
INPUT "AMOUNT';AMT 
INPUT "PHONE";TEL$:PRINT 
LSET N$=X$ 
LSET A$=MKS$(AMT) 
LSET P$=TEL$ 

100 PUT #1, CODE% 

110 GOTO 30 


Access A Random File 


The following program steps are 
random file: 
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COMMAND 


1 OPEN "FILE" AS #1 


2. FIELD #1,20 AS NS, 


NOTE: In a program that 
output on the same 
use just one OPEN 
statement. 


3. GET #1,CODE% 


4, PRINT N$ 


REMARKS 


REMARKS 


OPEN the file in random 


mode. 


t 
Use the FIELD statemen’ 
to allocate 4 AS A$, 8 AS 
P$ space in the random 
buffer for the variables 
that will be read from the 
file. 


performs both input and 
random file, you can often 
statement and one FIELD 


Use the GET statement to 
move the desired record 
into the random buffer. 


The data in the buffer 
may now be PRINT 
CVS(A$) accessed by the 
program. Numeric values 
must be converted back to 
numbers using the 
"convert" funetions: CVI 
for integers, CVS for 
single precision values, and 
CVD for double precision 
values. 


The program below accesses the random file "FILE" that 
was created in the program above by inputting the three 


digit code from the keyboard. 


The information associated 


with that code is read from the file and displayed. 
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EXAMPLE: 
ACCESS A RANDOM FILE 


10 OPEN "FILE‘AS #1 

20 FIELD #1, 20 AS N$, 4 AS A$, 8 AS P$ 
30 INPUT "2-DIGIT CODE";CODE% 

40 GET #1, CODE% 

50 PRINT N$ 

60 PRINT USING "$$###.##";CVS(A$) 

70 PRINT P$:PRINT 

80 GOTO 30 


The LOC function, with random files, returns the "current 
record number." The current record number is one plus 
the last record number that was used in a GET or PUT 
statement. For example, the statement 


IF LOC(1)>50 THEN END 


ends program execution if the current record number in 
File#1 is higher than 50. 
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APPENDIX B 


SUMMARY OF ERROR CODES AND ERROR MESSAGES 


CODE 


NUMBER MESSAGE. 


9 
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Subseript out of range 

An array element is referenced either 
with a subscript that is outside the 
dimensions of the array, or with the 
wrong number of subscripts. 


Line buffer overflow 
An attempt is made to input a line 
that has too many characters. 


Communication I/O error 
An I/O error occurred at RS-232C 


port. 

Can't continue 

An attempt is made to continue a 
program that: 


1. has halted due to an error, 


2. has been modified during a 
break in execution, or 


3. does not exist. 


Communication buffer overflow 
RS-232C port is full. 


Duplicate definition 

Two DIM statements are given for 
the same array, or a DIM statement 
is given for an array after the 
default dimension of 10 has been 
established for that array. 
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CODE NUMBER MESSAGE 


CODE NUMBER MESSAGE 


legal function call. F . 
ne ; A Sarameter that is out of range Is MO 22 Missing operand 
ath or string function. An expression contains an operator 


passed to a m 
An FC error may 
eens  Yjewnd NEXT without FOR 


ive or unreasonably large A variable in a NEXT statement does 
Let Sa not correspond to any previously 


also occur as the with no operand following it. 


subscript | executed, unmatched FOR statement 
2, a negative or zero argument Nevale: 
wih Bee No RESUME 
" An error trapping routine is entered 
3. a negative argument to SQR but contains no RESUME statement. 
4, a negative mantissa with a Out of data | 
non-integer exponent A READ statement is executed when j 
. there are no DATA statements with 
5. a call to USR funetion for unread data remaining in the program. 
which the starting address has id 
not yet been given Out of memory 
A program is too large, has too many 
6. an improper argument to MID$, FOR loops or GOSUBs, too many 
LEFT$, RIGHT$, INP, OUT, variables, or expressions that are too 
WAIT, PEEK, POKE, TAB, SPC, complicated. 
STRING$, SPACE$, INSTR, or i 
ON...GOTO Out of string space 


String variables have caused BASIC 
FN 26 FOR without NEXT to exceed the amount of free memory 
A F ' remaining. BASIC will allocate string 
Remain pias de peountered without a | space dynamically, until it runs out 


of memory. 
ID 12 Mllegal direct 
; 4 Overflow 
B sratement that is illegal in direct - The result of a calculation is too 
le is entered as a direct mode . . large to be represented in BASIC's 
command. number format. If underflow occurs, 
the result is zero and execution 
LS 151 String too long continues without an error. 
An attempt is made to create a | 
string more than 255 characters long. BADESUCL ate 
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a ee 


CODE NUMBER 
PI 31 
PO 28 
RG 3 
RW 20 
SN 2 
sT 16 
T™ 13 
TP 27 
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MESSAGE 


jnitialized = 
Babes Bort was not initialized. 
Printer offline 
Printer is not ready. 


ithout GOSUB 
A RETURN statement is encountered 
for which there is no previous, 
unmatched GOSUB statement. 


RESUME without error — 
A RESUME statement is encountered 
before an error trapping routine is 


entered. 


Syntax error 3 
A line is encountered that contains 
some incorrect sequence of 
characters (such as unmatched 
parenthesis, misspelled command or 
statement, incorrect punctuation, ete.). 


String formula too complex 

A string expression is too long or too 
complex. The expression should be 
broken into smaller expressions. 


Type mismatch 
A string variable name is assigned a 
numeric value or vice versa; a 
function that expects a numeric 
argument is given a string argument 
or vice versa. 


Tape read ERROR 
A read error occured on a cassette 
tape. 


-B4- 


CODE 


NUMBER MESSAGE 


UE 
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Unprintable error 

An error message is not available for 
the error condition which exists. 
This is usually caused by an ERROR 
with an undefined error code, 


Undefined user function 

A USR function is called before the 
function definition (DEF statement) is 
given. 


Undefined line 

A line reference in a GOTO, GOSUB, 
IF...THEN...ELSE, or DELETE is to a 
nonexistent line. 


WEND without WHILE 
A WEND was encountered without a 
matching WHILE, 


WHILE without WEND 
A WHILE statement does not have a 
matching WEND. 


Division by zero 

A division by zero is encountered in 
an expression, or the operation of 
involution results in zero being raised 
to a negative power. Machine 
infinity with the sign of the 
numerator is supplied as the result of 
the division, or positive machine 
infinity is supplied as the result of 
the involution, and execution 
continues. 


DISK AND RAM PACK ERRORS 


NUMBER 


CODE 
AM 58 
AO 54 
AT 63 
BN 52 
CF 70 
DF 59 
DN 64 
DO 72 
DS 62 
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MESSAGE 
« ina 
Disk has already been inserted in 
specified drive. 


ile already open 
i equential cu eS eee ane 
i for a file t r 

an or a KILL was given for @ file 


that is open. 


Bad allocation table 
A. File-Allocation-Table (FAT) of @ 
floppy disk or a RAM PACK was 


broken. 


ile number 
A eaten or command referenced 
a file with a file number that was 
not OPENed or was out of the range 
of file numbers specified at 
initialization. 


File not OPEN 
The designated file was not OPEN. 


Disk full —- 
All disk or RAM PACK storage is in 
use. 


Bad drive number 

Wrong drive number was designated, 
or some drive number out of system 
configuration was used. 


Disk off line 
The designated drive was offline. 


Direct statement in file 


CODE 


NUMBER MESSAGE 
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A direct statement was encountered 
while LOADing an ASCII-format file. 
The LOAD was terminated. 


Input past end 

An INPUT statement executed after 
all the data in the file had been 
INPUT, or from a null (empty) file. 
To avoid this error, use the EOF 
function to detect the end of file, 


File already exist 

The file name specified in a NAME 
statement is identical to filename 
already in use on the disk or RAM 
PACK. 


File not found 

A LOAD, KILL or OPEN statement 
referenced a file that does not exist 
on the current disk or RAM PACK, 


FIELD overflow 

A FIELD statement attempted to 
allocate more bytes than were 
specified for the record length of a 
random file. 


File write protected 
The designated file is protected from 
write operation. 


Internal error 

An internal malfunction has occurred 
in BASIC 

Disk I/O error 

An I/O error occurred on a disk or 
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APPENDIX C 


SSAGE 
CODE NUMBER MESS ASCH CHARACTER CODES 


It is a 


K 1/0 operation. 
ats een ive, the Cede gue Dec CHR Dec Hex Dec Hex CHR 
recover from the error. ) NUL 1D 58 BA ¢ 

i SOH 1E 59 3B 

i STx 1F 60 3c ¢ 

NM 61 Bad ne aratern was used for the 3 ETX op ai soe 
Alename with LOAD, SAVE, KILL or 4 £OT 20°! 62 3E +> 

filename ‘a filename with too many 5 ENQ 22 a 3F 2 

OPEN (e.g, s a Bite, aes 

characters). 7 ner # 4 ae 

i 8 BS 25 x 42 8B 

Rename across disks 9 a @ if 

RD 67 Rename was attempted between disks. fe a ‘ 43 ¢ 

1 after PUT vr 28 « 45 =£ 

Sequential afte! FF 29 ) 4 oF 
Bs we sevaential file was called after PUT. Gao x a Bl 
a so 2B + 48 oH 
Sequential 1/0 only ' > SI 2c : 49 «1 
SQ 69 el operations must be sequential. DLE A ae 
DC1l 2E 7 4B OK 
ad track/sector pDc2 2F 7 40 4 
es is niche track number and/or wrong pc3 30 0 4D M 
sector number were detected. Or pc4 31 1 4E oN 
non-existing track and/or sector NAK 32 2 4F 0 
numbers were designated by DSKI$ or SYN 33 3 50 Pp 
DSKO$. ETB 34 4 51 @ 
CAN 35 5 52 R 
EM 36s 8301s 
SUB 37 ? 547 
ESCAPE 38 8 55 ou 
9 


FS 39 


Dec=decimal, Hex=hexadecimal(H), CHR=character. 
LF=Line Feed, FF=Form Feed, CR=Carriage Return, 
DEL=Rubout. 


Characters can be displayed using PRINT CHR$(n), where 
mn is the ASCII. code. (ASCII codes 0 through 31 are 
_ control characters, usually used for control functions or 

communications. 
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ASCIL CHARACTER CODES ASCIL CHARACTER CODES 


ec Hex CHR 
oe Ae ce 0. Os iad 1 Clie Dec Hex CHR Dec Hex CHA CHR 
86 56 VU 115 «(73 . Nene eo) \ ess. ex Bec Hee 
87 57 OW 116074 coco tess 3 
u 1445 «91 + |Z 172 «AG OY x 
88 58 X 117-75 Peon A Ean EG 
89 69 FY. (he ak M2 1 H amd 22a ieee A 
17 w 147 93) oF z ; 
90 SA 2 119 1 eae 8 oe GG 
91 5B 120 78 * 148 a Ale BO <u . 
79 Y 149) = 95° = Bok ‘ 
eS ooans hee | j it EG 206 Cl 
93 5D 422 7A 2 150 96 Alp Elec Oe a a : 
04«(SE * 3 7B «OC «| «817 ee saa 208 DO } c) 
95 SF = fed) Savor wt 152 98 Fr ay Bot ee 2 of 
96 60 * 15) YOU er 153 99 7 Pe ss Sop eOate® ¢ 
97 61 oa Se VE: 154 9A ae Pit, Osmes x 
98 62 ob Rov! 7e) | DELS 156)0 OB) 52 Hea) Fit 212 «04S z 
99 63 IN 128 80 — 156" 90 “ie hae ae: a 213 «DSS 
100 64 od 129 «81 = 167 9D 4 Wie, BOLL 214 D6? 
101 65 ee 130 82 = 168 9E + a6) BA = Ziolen D7 aene 
102 66 Of 131 63m 159 OF 4 187 +BBOA 216 08 
103 6&7 9 132 84 om 160 AO a 498 «#4BC A 217 ~D9 ‘ 
104 68 oh 13385 161 ALB 189 Bo ‘ Pat fs 2 
fe ed | we oe om fio as a 
107 6B Ok 136 88 492 CO ft Zoi OD meee 
108 6c 1 137 ; Penman 193 Ci a 222, DE | 
a9 ESS SDS im Ook at ie ieee 94 C2) 223 «OF 
ER moe I teem an BS 195 « C3 > 224 £0 = 
us a te ae or ten AD ae 1960 C4 225 (0 E1C# 
111 6F 0 140 8C ff 168 AS ot ewes wis cont Teme 
112 70 Pp 141 8D gf 169 AS x nah Ug. ce a 8 
114 g f coe HD INR 499 «C7: ¢ 228 64 
i =deci ex=hexadecimal(H), CHR=character. | 
rae arena Simei) CHR=character. nee egcimet vie FF=Form Feed, CR=Carriage Return, 
=Line Feed, =Form Fee: a A Li 
DEL=Rubout. 4, CR=Carriage Return, | DEL=Rubout. ; 
haracters can be displayed using PRINT CHR$(n), where 
Characters can be displayed using PRINT CHR$(n), where } a is the ASCH code. ASCII codes 0 through 31 are 
‘ it ec cover, Ase fcodesyi0 through 31 are control characters, usually used for control functions or 
ee ogee aoa i ications. 
communteations: ly used for control functions or » commun) 
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APPENDIX D 
T100 T-BASIC UTILITIES 


The 7100 utility program allows you to: 
° Format the disk for T-DISK BASIC 
° Format the RAM PACK for T-DISK BASIC 
° Perform a disk copy 
The utility program is located on your T-DISK BASIC 
system diskette. To access the utility program: 
Power on and start up the system. 


Load utility program "FDUTIL" using the LOAD 
command. 


After the system responds with an "Okt 
displayed on the sereen, enter the RUN command. 


Upon execution, FDUTIL displays a menu with the 
following options: 


Funetion List 
Ls Formatting 
Floppy Disk Copy (volume) 


0. End 


Formatting (function 1) initializes either a diskette or 
RAM PACK, while Floppy Disk Copy copies a disk. 
Function 0 ends the FDUTIL program. Selecting a 
funetion number (1, 2, or 0), followed by a carriage 
return, determines which function will be performed. 
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FUNCTIONS 


i is always 
Formatting a _mini_floppy_disk. eta want to erase 
necessary with new diskettes; W! to file empty status; 


i disk 
all data on a disk and set the q 
or when a hardware error is detected on 


write operation. 


disk read or 


To format a disk: 

o Type al and a carriage return to gles the 
Formatting funetion from the utility us ee is 

) Insert a disk in Drive 2 and bala i 
keyboard, followed by a carriage return. — 

° The system responds wip 
flo to be formatted as S. \. Y 
vente Y or N in response to this question. — 

° When formatting is complete, the system again 
displays the Formatting menu, 


P sacits for 
rmatting a RAM PACK. _ Formatting is necessary 

ai new RAM PACK units; for changing the RAM 
PACK battery; when data is lost from the RAM PACK 
due to insufficient battery power; oF for erasing all 
RAM PACK data and setting it to the empty state. 


To format a RAM PACK: 


° Type a 1 followed by a carriage return from 
the utility menu to select the Formatting 
funetion. 

° Insert the RAM PACK into the slot under the 
cover located at the upper right side of the 
keyboard. 

° Type a 5 followed by a carriage return to 
select the RAM PACK from the Formatting 
menu. 

° The utility program checks the memory volume 
of the RAM PACK and displays it on the sereen. 

° When formatting is complete, the system 
displays the Formatting menu. 
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Disk Copy. This utility copies the contents of an 


entire disk to another disk. 


To copy a disk: 


° 


° 
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ke 
Type a 4% followed by a carriage return on the 
utility menu to select Disk Copy. 
Remove the system disk from Drive 1. Insert 
the original disk in Drive 1 and type a 1 on the 
keyboard, followed by a carriage return. 
Insert the disk to be copied to in Drive 2 and 
type a 2 on the keyboard, followed by a 
carriage return, The copy will be made from 
Drive 1 to Drive 2. 
When the copy is complete, you may make more 
copies or stop. The system displays the message: 


Enter Drive number (1,2,3,4) 
(0=stop) 
Original drive? 


To perform additional copies, select new 
diskettes and repeat the copy procedure. 

To terminate the copy function, replace the 
system disk in Drive 1 and enter a zero (0) 
from the keyboard. 


APPENDIX E 
CP/M CONFIG.COM SELECTION SCREENS 


When you configure CP/M, you choose screens from this 
Main Menu that allows you to redefine control codes, 
There are six selection screens corresponding to options 1 
- 6 on this menu. 


Modify CRT Control Codes 
Modify Printer Control 

Modify Keyboard Matrix 

Modify Communications Parameters 
Select Default Screen Size 

Sysgen System 


These options generate the following screens: 


Modify CRT Control Codes 
T100 CRT CONTROL CODES 


Lead in Code '** 9) Clear to End of Screen “4 
Clear Screen Code ** 10) Delete Line Code 19 

Home Cursor Code \® 11) Insert Line Code %6 

Up Cursor Code ‘'* 12) Read Cursor Address Code $ 
Down Cursor Code ‘! 13) Set Cursor Address Code (7 
Left Cursor Code #% 14) Auto LF (Y / N) w 
Right Cursor Code 1% 15) Y-X Position (Y/N) ™ 
Clear to End of Line \< 


All Correct? 
Modify Printer Control 
T100 PRINTER CONTROL CODES 


(1) Auto Printer LF (Y / N) 
(2) Select Code 
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Wake Up oe ey é) ‘ Select Default Screen Size 
mH A eae (Y/N) ott | T100 DEFAULT SCREEN SIZE 
(8) Parity (Even, Odd, None) ny (1) 80 x 24 

All Correct? P ‘a ae | an 


‘ (4) 36 x 19 
Modify Keyboard Matrix 


T100 KEYBOARD MATRIX 


Correct Selection? 


Use the SYSGEN system to create new CP/M system disks. 


This screen allows you to program values for a specific 
application program for the keys listed. Allows you to 


customize your keyboard for a particular program. 
Normal Shift —_ 


(1) Cursor Up %° PFL (16) 
(2) Cursor Down 3! PF2 (17) 
(3) Cursor Left Y ..  PF3 (18) 
(4) Cursor Right2%..  PF4 (19) 
(5) Insert Neda Lt (20) 
(6) Delete NE a ety FS (21) 
(7) Graph-8 )%4 .. PFT (22) 

PF8 (23) 


All Correct? 


Modify Communications Parameters 


T100 COMMUNICATIONS CODES 


(1) Baud Rate tp 
(2) Parity (Odd, Even, None) ... 
(3) Number of Stop Bits 
(4) Number of Bits per Byte 
(5) Duplex-Full or Half 


All Correct? 
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APPENDIX F 


Assembly Language Subroutines 


All versions of T-BASIC and T-DISK BASIC have 
provisions for interfacing with assembly language 
subroutines. The USR function allows assembly language 
subroutines to be called in the same way T-BASIC's 
intrinsic functions are called. 


Bl MEMORY ALLOCATION 


Memory space must be set aside for an assembly language 
subroutine before it can be loaded. During initialization, — 
enter the highest memory location minus the amount of 
memory needed for the assembly language subroutine(s). 
T-BASIC uses all memory available from its starting — 
Jocation up, so only the topmost locations in memory can 
be set aside for user subroutines. 


When an assembly language subroutine is called, the stack 
pointer is set up for § levels (16 bytes) of stack 
storage. If more stack space is needed, T-BASIC'S stack 
ean be saved and a new stack set up for use by the 
assembly language subroutine. 7T-BASIC's stack must be 
restored, however, before returning from the subroutine. 


The assembly language subroutine may be loaded into 
memory by means of the T-BASIC BLOAD statement. 


F.2 USR FUNCTION CALLS 
The format of the USR function is 

USR[<digit>Kargument) 
where <digit> is from 0 to 9 and the argument is any 
numeric or string expression. The parameter <digit> 
specifies which USR routine is being ealled, and 
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in the . 
is omitted, USRO Is 


corresponds to the digit supplied 
EF USR statement 


statement for that routine. ae 
assumed, The address give! 
determines the starting address of the 
i i A contains 
When the USR function call is mane, set Veaerrs 
fa value that specifies the type ) , as Paeie: 
given. The value in A may be one 0) 


Value in A Type of Argument 


2 Two-byte integer (two's complement) 
3 String 

4 Single precision floating point number 
8 Double precision floating point number 


ii ister pair points 
f the argument is a number, the [H,L] regis’ 
th the Floating Point Accumulator (FAC) where the 
argument is stored. 


If the argument is an integer: 


FAC-3 contains the lower 8 bits of the argument and 
FAC-2 contains the upper 8 bits of the argument. 


If the argument is a single precision floating point number: 


FAC-3 contains the lowest 8 bits of mantissa and 
FAC-2 contains the middle 8 bits of mantissa and 
FAC-1 contains the highest 7 bits of mantissa with 
leading 1 suppressed (implied). Bit 7 is the sign of 
the number (0=positive, 1=negative). FAC is the 
exponent minus 128, and the binary point is to the 
left of the most significant bit of the mantissa. 
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If the argument is a double precision floating point 
Number: 


FAC-7 through FAC-4 contain four more bytes of 
mantissa (FAC-7 contains the lowest 8 bits). 


If the argument is a string, the [D,E] register pair points 
to 3 bytes called the "string descriptor." Byte 0 of the 
String descriptor contains the length of the string (0 to 
255). Bytes 1 and 2, respectively, are the lower and 
Upper 8 bits of the string starting address in string space. 


CAUTION:If the argument is a string literal in the 
program, the string descriptor will point to 
program text. Be careful not to alter or 
destroy your program this way. To avoid 
unpredictable results, add +" to the string 
literal in the program. Example: 


A$ = "TBASICN+™ 


This will copy the string literal into string space and will 
prevent alteration of program text during a subroutine call. 


Usually, the value returned by a USR function is the same 
type (integer, string, single precision or double precision) 
as the argument that was passed to it. However, calling 
the MAKINT routine returns the integer in [H,L] as the 
value of the function, forcing the value returned by the 
function to be integer. To execute MAKINT, use the 
following sequence to return from the subroutine: 


PUSH H save value to be returned 
LHLD XXX iget address of MAKINT routine 
XTHL save return on stack and 

sget back [H,L] 
RET sreturn 
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i diess of its type, 
t of the foe ont the FRCINT 


Also, the argumen' j 
f the argument in 


i r 
may be forced to an intege 
routine to get the integer vas 
(H,L}. Execute the following routine: 


LXI H yget address of subroutine 
scontinuation 3 
splace on stac’ 
LALD ae jget address of FRCINT 
PCHL 
SUBl: .. +++ 
F.3 CALL STATEMENT 


cALL STA 


T-BASIC and T-DISK BASIC user funetion calls may also 
be made with the CALL statement. 


i tes a simple 
A CALL statement with no arguments generates 
CALL instruction. The corresponding subroutine should 


return via a simple RET. 


A subroutine CALL with arguments results in a somewhat 
more complex calling sequence, For each argument in the 
CALL argument list, a parameter Is passed to the 
subroutine. That parameter is the address of the low 
byte of the argument. Therefore, parameters always 
occupy two bytes each, regardless of type. 


The method of passing the parameters depends upon the 
number of parameters to pass: 
at If the number of parameters is less than or 
equal to 3, they are passed in the registers. 
Parameter 1 will be in HL, 2 in DE (if present), 
and 3 in BC (if present). 


2. If the number of parameters is greater than 3, 
they are passed as follows: 


1. Parameter 1 in HL. 
2. Parameter 2 in DE. 


PADS8111-1 “Fa 


a 


3. Parameters 3 through n in a contiguous data 
block. BC will point to the low byte of this 
data block (i.e., to the low byte of parameter 3). 


Note that, with this scheme, the subroutine must know 
how many parameters to expect in order to find them. 
Conversely, the calling program is responsible for passing 
the correct number of parameters. There are no checks 
for the correct number or type of parameters. 


When accessing parameters in a subroutine, don't forget 
that they are pointers to the actual arguments passed. 


NOTE: It is entirely up to the programmer to see to it 
that the arguments in the calling program match 
in number, type and length with the parameters 

* expected by the subroutine.This applies to 
T-BASIC subroutines, as well as those written in 
assembly language. 


Ra INTERRUPTS 


Assembly language subroutines ean be written to handle 
interrupts. All interrupt handling routines should save the 
stack, registers A-L and the PSW. Interrupts should 
always be re-enabled before returning from the 
subroutine, since an interrupt automatically disables all 
further interrupts once it is received. 


APPENDIX G 
GREEK CHARACTERS (P1010/1150 PRINTERS) 


The TOSHIBA 1T100 Personal Computer's Greek character 
Set cannot be typed from the keyboard directly to the 
1 display. Greek characters can only be generated from 
} executing application programs using the CHR$(X) 
| function. (Greek character codes may be found in 
Appendix C.) For example, to print the Greek character 
| "alpha" on the sereen, execute PRINT CHR$(160). 


Once Greek characters are on the screen, the COPY key 
| will not cause them to be printed on the P1010 or P1150 
| printers. Kana characters will be printed if you use 
} copy. 


If you use LPRINT CHR$(X) from an executing program, 
Greek characters will not be printed to the P1010 or 
P1150 printer. 


You must precede the LPRINT with the appropriate 
escape sequence. 


The following will cause the Greek characters to print to 
the display and P1010/P1150 printers. Other printers may 
require different escape sequences. 


REM SET GREEK ESC SEQUENCE 
10 LPRINT CHR$(27);:REM "ESC" 

20 LPRINT CHR$(38);:REM "é&'t 

30 FOR I = 160 TO 223 

40 LPRINT CHRS(I);:REM PRINT GREEK 
50 NEXT I 

60 REM RESET ESC SEQUENCE 

70 LPRINT CHR$(27); 

80 LPRINT CHR$(36); 

90 END 


APPENDIX H 
CP/M COLOR PROGRAMMING 


Standard CP/M does not support graphic and color f 
functions, but the TOSHIBA T100 Personal Computer's 
CP/M has the normal seven register groups (each one 
byte) in BIOS and also supports the following functions — 
corresponding to each of the registers. i 


1. CRT MODE Establishment (Text Mode, Graphic — 

Mode and High-Resolution Mode) i} 
ii 
Foreground Color Establishment (Foreground © 
Color) | 


Background Color Establishment (Background 
Color) 


Reverse Display 
Position on Coordinate Y of Color Designation 


Position on Coordinate X of Color Designation 
(Low byte) 
Same as the above (High byte) ‘J 
200i 
You can execute graphie and color functions by setting a 
value in each register. The register address and vite 
patterns are displayed in the following figures: 


Bit Pattern or Register 
Set for New Mode 


Mode HOw 
BIOS + 51H . 


ouen 


Modes i ono | ade 
i » bem: (ARM 
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set for New Color 


Foreground 
Color ‘ f { 
BIOS + 52H lege eal i a Mode/Color Code, ete., as shown in the previous figures. 
5 color 0-7 \ bdos equ  _0005h 
a org 100h 
r mvi a,80h 
= ipo sta 56913 Text Mode 
Background mvi a,82h 
Color lim sta 56914 Foreground Color "Red" 
BIOS + 53H Jisia)) ios es ose mvi_a,80h 
MSE, 0-7 sta 56915 Background Color "Black" 
Coleg mvi 2,0ch 
sta 56917 Location Y = 12 
——-—- Set for New Reverse mivi a,28h 
Reverse 1 tadbdie 109 __ salt) Sala sta 56918 Location X = 40 (low) 
Flag mvi a,00h 
BIOS + 54H ibe | kag eT sta 56919 Location same as the 
MSB LSB - above 0 (high) 
__Reverse 0 = normal mvi 
1 = reverse sta Set Color Code on 
Set for new X, Y postion 9 coordinate (X , Y) 
push 
Cursor . mvi 
Pos. mvi 
BIOS + 55H [SS TAT et) eal 
p pop 
Cursor (L) ret 
Pos. F 
+ Red code is set on (X, Y) = (40, 12), and "A" is displayed 
BIOS eee.” ees] ea) | Ss on (X, Y) = (41, 12) in "Red" 
Cursor ) NOTE: A Color Code change in the text mode requires 
BIOS + 57H | one screen position for the color attribute 
eee code. A Color Code change in the high 
A ; resolution mode requires 8 dots of space for 
Instructions on the use of each register function follow: color attribute. 


The eighth (MSB) bit is a flag which identifies a change 
i the other seven bits. To modify any function (except 

ie cursor position register), turn "ON" t i i 
(MSB) and establish each $ hopioienin pit 
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APPENDIX I 


ALPHABETICAL COMMANDS AND 
STATEMENTS/FUNCTIONS LIST 


CVI, CVS, CvD 
DATA 


DEF FN 
DEFINT/SNG/DBL/STR 
DEF USR 

DELETE 
IM 
DRAW 
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DSKF 

DSKI$ 

DSKO$ 

EDIT 

END 

EOF 

ERASE 

ERR and ERL VARIABLES 
ERROR 

EXP 

FIELD 

FILES and LFILES 
FIX 
FOR...NEXT...STEP 
FPOS 

FRE 

GET 

GET@ 
GOSUB...RETURN 
GOTO 

HEX$ 


I... THEN[...-ELSE] and IF...GOTO 


INIT 

INKEY$ 

INP 

INPUT 
INPUT$ 
INPUT# 
INPUT#n 
INSTR 

INT 

KEY 

KEY LIST 
KEY ON/OFF 
KEY(n) ON/OFE/STOP 
KILL 

LEFT$ 

LEN 

LET 

LINE 

LINE INPUT 
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LINE INPUT# 

LINE INPUT#n 
LIST 

LLIST 

LOAD 

Loc 

LOCATE 

LOF 

LOG 

Leos 

LPRINT and LPRINT USING 
LSET and RSET 
MERGE 

MID$ 

MKI$, MKS$, MKD$ 
MOTOR 

NAME 

NEW 

ocT$ 

ON COM GOSUB 
ON ERROR GOTO 
ON...GOSUB and ON GOTO 
ON KEY GOSUB 
OPEN 

OPTION BASE 

OUT 

PAINT 

PEEK 

PLAY 

POINT 

POKE 

PORT 

POS 

PRESET 

PRINT 

PRINT USING 
PRINT# and PRINT # USING 
PRINT#n 

PSET 

PUT 
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118 
121 
1276 
128 
129 
tynhis0 


1-61 1BCA4 


PUT@ 
RANDOMIZE 
READ 

REM 

RENUM 
RESTORE 
RESUME 
RETURN 
RIGHTS 

RND 

RUN 

SAVE 
SCREEN 

SET 

SGN 

SIN 

SOUND 
SPACE$ 

SPC 

SQR 

STOP 

STR$ 
STRING$ 
SWAP 

TAB 

TAN 

TERM 

TIME and TIME$ 
TRON/TROFF 
USR 

VAL 
VARPTR 
WAIT 
WHILE... WEND 
WIDTH 
WIDTH LPRINT 
WRITE 
WRITE# 
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PRODUCT COMMENT FORM 


Publication Title: 
Publication No. Revision. Date 
Name — 


Address State Zip Code 


TOSHIBA welcomes your comments regarding any errors, discrep- 
ancies or omissions you may have discovered, or any suggestions for 
improving the manual in its next revision. 


TECHNICAL/CLERICAL ERRORS, OMISSIONS (SPECIFY 
PAGE NUMBER) 


SUGGESTIONS 
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T100 Product Manager 


TOSHIBA AMERICA, INC. 
2441 Michelle Drive 
Tustin, CA 92680 


